Дан линейный массив в размере 5 вывести элементы больше 10
Ответы на вопрос
Ответил Light1974
0
program zadacha;
var
a:array[1..5] of real; {можно взять и тип integer}
i:integer;
Begin
for i:=1 to 5 do
begin
writeln('Введите элемент массива');
readln(a[i]);
end;
for i:=1 to 5 do
if a[i]>10 then write(a[i],' ');
writeln;
End.
var
a:array[1..5] of real; {можно взять и тип integer}
i:integer;
Begin
for i:=1 to 5 do
begin
writeln('Введите элемент массива');
readln(a[i]);
end;
for i:=1 to 5 do
if a[i]>10 then write(a[i],' ');
writeln;
End.
Новые вопросы
Математика,
2 года назад
Информатика,
2 года назад
Алгебра,
9 лет назад
Математика,
9 лет назад
История,
10 лет назад