Boit
6 год назад
Напишите программы. Челики выручайте.
ОТВЕТЫ
Ivanovich
Jul 7, 2019
1)program m_1;var a:array[1..10] of integer;j:integer;beginj:=1;while jlt;=10 do beginreadln(a[j]);j:=j+1;end;end.
2)program m_1;var a:array[1..10] of integer;j:integer;beginfor j:=1 to 10 do readln(a[j]);end.
2)program m_1;var a:array[1..10] of integer;j:integer;beginfor j:=1 to 10 do readln(a[j]);end.
98
Смежные вопросы:
