Дано 10 чисел.вевести четыре числа начиная со второго
3 комментария:
Язык?
Паскаль
Спасибо
Язык?
Паскаль
Спасибо Ответы
Гость Const n=10;var a:array [1..n] of integer;i:integer;beginrandomize;for i:=1 to n do a[i]:=random(50);for i:=2 to 5 dowriteln(a[i]);end.
1 комментария:
const n=10;var a:array [1..n] of integer;i:integer;beginrandomize;for i:=1 to n do a[i]:=random(50);for i:=2 to 5 dowriteln(a[i]);end.
const n=10;var a:array [1..n] of integer;i:integer;beginrandomize;for i:=1 to n do a[i]:=random(50);for i:=2 to 5 dowriteln(a[i]);end. Похожие вопросы
Список предметов
