Как найти наибольшее из двадцати чисел? решение в программе паскаль?
Танрпол
1
30.03.2019 11:00
0
Другие вопросы по теме Информатика
solanastas123
16.07.2019 06:50
lol6633
16.07.2019 06:50
Saca2000
10.04.2020 10:44
amirgrossman
24.09.2019 15:10
anyaadamchuk2
11.12.2020 04:03
Dok11111111111
11.12.2020 04:03
Davidovaliza
11.12.2020 04:02
cfgcgj
11.12.2020 04:02
blazer6
11.12.2020 04:02
Популярные вопросы
- Решить сколько граммов соли получится при взаимодействии 14,8 гр. гидроксида кальция...
3 - Длина прямоугольника 18 см а ширина 9 см. на сколько увеличится площадь прямоугольника...
2 - Рассмотри,как красиво оформляли начальную букву текста создатели книг.напиши 1-2...
1 - Дано вектори а(2; 5) і b(-6; y). при якому значнні y ці вектори перпендикулярні?...
2 - Назовите известные вам уменьшения трения...
2 - Решить с пояснениями инеса сьела 0.03 кг конфет это есть 2.4% от всех конфет.сколько...
1 - Найти производное f(x)=-9x(в 3 степени)-3x(в 9 степени)-x+10 от х(в 0 степени)=-1...
3 - Какой объем углекислого газа (н.у.) выделится при взаимодействии карбоната кальция...
2 - Надо число 804035 и число 320790 разложить на сумму разрядных слагаемых...
3 - Где мусоргский получил образование и какое?...
3
var
a: array[1..20] of integer;
n,i:integer;
begin
for i:=1 to 20 do
readln(a[i]);
n:=a[1];
for i:=2 to 20 do begin
if a[i]>n then
n:=a[i];
end;
writeln('naibolshee= ', n);
end.