Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program gh;
var a: array[ 1..10] of integer;
i: integer;
begin
for i: =1 to 10 do
a[i] : = random(20) + 20;
write(a[i]);
end;
end.
var
x: real;
readln(x);
writeln(x: 0: 0);
пщояк 17 27 16 33 17
нщёп 15 27 7 17
3 учеников этого класса любят все три вида спорта
Популярные вопросы