logo
Войти Регистрация Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
ДашаШирова

Составить программу для нахождения наибольшего из двух чисел a и b и вывести на экран n=1 если наибольшем является a ,и признак n=2 в противном случае

Показать ответ
Ответ:
kristaile
kristaile
28.07.2020 01:36
UPD

var
a,b,n:integer;
begin
readln(a,b);
if a>b then n:=1
else n:=2;
writeln(n);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Vareniki0513
Vareniki0513
08.05.2023 04:56
Нужно на Питоне Укажите через запятую в порядке возрастания все основания систем счисления, в которых запись числа 23 оканчивается на 1 15) Укажите через запятую в порядке...
Vovndr
Vovndr
15.01.2021 03:01
У чому полягає компіляція програми?​...
апркаерн
апркаерн
18.04.2021 05:18
В чем особенность роботов по сравнению с людьми?...
tugatimu9876
tugatimu9876
10.01.2022 21:08
У якому випадку цикл whіle не виконається жодного разу?...
vovaq6oziu5d
vovaq6oziu5d
05.07.2021 08:25
Вывести квадраты нечетных чисел от 1 до 100 как сделать такую программу на с++...
адай6
адай6
23.01.2021 05:54
СКОЛЬКО ВРЕМЕНИ ДАЮ 10 ГОЛОСОВ...
Околофутбольник
Створити на робочому столі папку та назвати її власним прізвищем та ім’ям. Відкрийте середовище Scratch. Відповідно створеного в зошиті алгоритму роботи програми реалізуйте...
ELINA98736
ELINA98736
26.07.2021 06:29
Ошибка в pascal (Встречен begin, а ожидался конец файла , что нужно дописать чтобы ошибка исчезла? uses GraphABC; procedure Zv (x,y: integer; cl:integer); var i,k: integer;...
шляпамайонезная
40 1. заданы коэффициенты квадратного уравнения a, b и с. составить бса решения квадратного уравнения, начав рассуждения со сравнения d 0. 2. заданы три неравных числа...
keklol1990
keklol1990
31.07.2020 23:15
Написать программу в паскале(тема циклов) и блок схему : для различных вводимых с клавиатуры целых чисел найдите сумму положительных нечетных....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота