C (8), случ. числа [-10;10], найти наименьший элемент в паскале.
Ответы на вопрос
Ответил valgrisa
1
Ответ:
program test;
var c: array [1..8] of integer;
i,m: integer;
begin
randomize;
for i:=1 to 8 do
begin
c[i]:=random(21)-10;
if i=1 then m:=c[i] else
if c[i]<m then m:=c[i];
write(c[i],' ')
end;
writeln;
write(m)
end.
Новые вопросы
Українська мова,
2 года назад
Русский язык,
2 года назад
Математика,
7 лет назад
Химия,
7 лет назад
Математика,
8 лет назад