Есть ответ 👍

Заполните целочисленный массив а размерностью 10 элементов по формуле 2 + 3m, где m — порядковый номер элемента массива, и выведите его на экран монитора в одну строку. сохраните программу и оправьте на проверку учителю.

270
404
Посмотреть ответы 3

Ответы на вопрос:


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.
Fhftt3
4,4(69 оценок)

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.

Прошу прощения за . программа рабочая. //pascalabc.net //naaman var       a,b : real; begin       write('введите а и в: ');       readln(a,b);       if (a=0) then             writeln('корень отсутствует')       else             writeln('корень ', -b / a) end.

Популярно: Информатика