Найти наибольшее из четырех, введенных с клавиатуры чисел(паскаль)
Урок541
3
13.05.2019 00:01
3
Другие вопросы по теме Информатика
Пан2007
28.09.2019 00:40
слар
28.09.2019 00:40
abdigalikova1708
28.09.2019 00:40
vhovalyg90
22.07.2019 22:20
klemeshova1989
03.03.2021 13:59
1337zezar1
03.03.2021 14:00
Давиденко
16.07.2019 19:10
Snake505
16.07.2019 19:10
annfeed17082005
16.07.2019 19:10
Андрей12385
16.07.2019 19:10
Популярные вопросы
- Кто ответ фигню бан Наурыз - ерекше мереке тақырыбына диалог құрастыр.(6+6...
3 - Какой витамин получают из рыбьего жира ...
3 - Қазақ әдебиеті» пәнінен 3-тоқсан бойынша жиынтық бағалау тапсырмалары Оқушының...
2 - Назовите великих русских партий артистов Расскажите о них...
3 - D) Запишите больший корень данного уравнения у меня соч ...
3 - начерти чертёж и реши задачу Из двух населенных пунктов на встречу друг...
2 - 8. Денсаулыққа зиянды әдета) дұрыс тамақтану ә) спорт б) фастфуд в) ауру-астан...
3 - Найдите периметр треугольника, если его стороны равны 790мм,57см, 3,8дм...
3 - Reading Task 2. Read and answer the question. Where is he/she from?1) I...
2 - Тирек сөздерді пайдаланып қазақ гарышкерлері тақырыбына мақала жаз...
3
program raf105;
var a, max1,i: integer;
begin
writeln('Вводите числа по очереди');
max1:= -10000;
for i:=1 to 4 do
begin
readln(a);
if a>max1
then max1:= a;
end;
writeln('Наибольшее: ',max1);
end.
Язык PascalABC