1. Информатика
  2. Составить программу на pascal

Составить программу на pascal abc нахождение наибольшего из 4 чисел

nilnazarov666 nilnazarov666    1   24.09.2019 12:30    2

Ответы
iYaw999 iYaw999  08.10.2020 15:09
Var a,b,c,d:integer;
begin
write('a,b,c,d->'); read(a,b,c,d);
if a<b then a:=b;
if c<d then c:=d;
if a>c then Writeln(a) else Write(c);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
карпать1картошку карпать1картошку  21.12.2020 21:09
Нехай елементи табличної величини a[1..10] набувають відповідно значень 5, -6, 3, 8, 25, -12, 15, 0, -2, 4. Яке значення набуватиме змінна n після виконання наступного...
Vftfg Vftfg  21.12.2020 21:09
Информатика 1. а = ложь, в = истина, с = ложь. Определите результаты вычислений. 2. Постройте таблицы истинности. А) не (а и в) или с Б) не а и в ЗАРАНЕЕ...
RomZo1 RomZo1  21.12.2020 21:09
Каким правилам необходимо следовать при создании таблицы по тексту? Укажите один или несколько правильных вариантов ответа: 1.Названия, строк и столбцов, должны...
kublahan kublahan  21.12.2020 21:10
Написать программу, которая считает, сколько раз встречается определенный символ в строке. Первая строка ввода программы - это слово или предложение. Вторая строка...
sveta2015w sveta2015w  31.03.2019 12:30
Цепочка: сделай из волка козу. вместо ? -должно быть слово...
natik045 natik045  31.03.2019 12:30
Для адресации в сети с протоколом ipv4 используется следующий адрес ограниченного широковещания: 194.186.6.127, а служебный адрес ip-сети: 194.186.6.0. какова маска...
Botan0011 Botan0011  19.11.2020 19:54
Для какого имени истинно высказывание: (Первая буква согласная → Вторая буква согласная) ~ Имя содержит букву «л»? Выберите один ответ: а. Людмила б. София в. Степан...
maslyuk05 maslyuk05  19.11.2020 19:54
Помагите что из себя представляет программа microsoft excel? 2) наиболее важные элементы программы excel 3) ячейка и адрес ячейки 4) рабочий лист 5) переключение...
lerkakotik1983 lerkakotik1983  19.11.2020 19:54
Сколько типов содержит инструмент ведро​...
Bars1995 Bars1995  03.09.2019 00:40
Найти среднее арифметическое 3 любых чисел.написать на qbasic...

Популярные вопросы