НАЙТИ МАКСИМАЛЬНЫ ЭЛЕМЕНТ 4 ЧИСЕЛ В ПАСКАЛЕ
5-9 класс
|
var a,b,c,d,e,f:real;
begin
readln(a,b,c,d);
if (a>b and a>c and a>d) then writeln(a);
if (b>a and b>c and b>d) then writeln(b);
if (c>a and c>b and a>d) then writeln(c);
if (d>b and d>a and d>c) then writeln(d);
end.
попробуй таким образом. не проверял может сработает
Другие вопросы из категории
файла
3)форматирование файла
4)поиск и замена текста
5)проверка правописания
6)изменение параметров страницы
7)перемещение фрагментов текста
8)обращение к справочной системе
9)сохранение файла
10)печать файла
Читайте также
его индекс.
5) Найти максимальные элементы среди положительных элементов массива 6) Найти максимальные элементы среди отрицательных элементов массива
7) Определить количество максимальных элементов массива
P.S Ребят, все в паскале...заранее спасибо=*
элементом вставить 0.
HELP ! составьте программку))