Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Beheh
28.07.2022 05:35 •
Информатика
Даны целых два числа a и b. написать программу, которая находит большее из них
Ответ:
ззннааййккаа
23.09.2020 12:56
Var
a,b:integer;
begin
readln(a,b);
if(a>=b) then writeln(a)
else writeln(b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
МаркРешетов
24.07.2021 00:32
Алгоритмнің неше түрі бар?...
FireBOY57
27.05.2023 12:38
Z=x-10sinx-|x2-x3| - 2 и 3 степени) надо написать прогу visual studio 2005 , на clr console application...
operat0r
17.01.2023 04:34
Как улудшить графику в пабг мобайл лайт ...
Nikitos228456
06.11.2021 23:51
Составьте программу на языке паскаль для следующих : 1. найдите сумму всех чисел от a до 500 (значение a вводится с клавиатуры; a≤500). 2. найдите среднее арифметическое...
bekkalvina2405
13.02.2022 23:32
ниже приведена база данных: 1) определите одно имя поля базы данных; 2) определите количество записей в базе данных...
dgolsky07
29.05.2021 14:51
Определите значение переменной b после выполнения алгоритма: a : = 10 b : = 18 a : = b mod 3 + a div 2 b : = a+b...
sonashkumatova
29.05.2021 14:51
Определите значение переменной b после выполнения алгоритма: a : = 10 b : = 18 a : = b mod 3 + a div 2 b : = a+b...
saschatuba
31.10.2022 14:05
Значение разорванной композиции герой нашего времени....
Dick666
10.08.2022 02:53
Решить с пояснением полный квадрат ...
Kottenok2005
26.10.2021 11:48
Что за отверстия на каждом сегменте брюшка у майского жука с нижней стороны и какова их роль? ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a,b:integer;
begin
readln(a,b);
if(a>=b) then writeln(a)
else writeln(b);
end.