Заполните целочисленный массив А размерностью 10 элементов по формуле 2 + 3m, где m — порядковый номер элемента массива, и выведите его на экран монитора в одну строку. Сохраните программу и оправьте на проверку учителю.
Заполните целочисленный массив А размерностью 10 элементов по формуле 2 + 3m, где m — порядковый номер элемента массива, и выведите его на экран монитора в одну строку.
Сохраните программу и оправьте на проверку учителю.
Гость
Ответ(ы) на вопрос:
ГостьVar
A: Array[10] of integer;
i:integer;
Begin
for i := 1 to 10 do
A[i] = 2 + 3*i;
for i := 1 to 9 do
write(A[i], ' ');
writeln(A[10]);
End.
Гостьvar a:array[1..10] of integer;
m:integer;
begin
for m:=1 to 10 do
begin;
a[m]:=2+3*m;
writeln(a[m]);
end;
end.
Не нашли ответ?
Похожие вопросы