Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
ната1187
20.03.2021 02:08 •
Информатика
Напишите программный код к следующей блок схеме
Ответ:
Fezit
11.09.2020 20:48
Var
A,b,max:integer;
Begin
Read(a,b);
If a>b then max:=a
Else max:=b;
Write(max)
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
AgentRuba
13.01.2023 17:52
Написать программу которая выводит одно число на экран, ели оно больше 2а...
nomerperv
13.01.2023 17:52
Найти сумму 15-ти членов рядов, начиная со второго, общий член которого an= n^lnn/(lnn)^n, где n1=2...
az34358strelok8390
13.12.2021 02:20
Кракозябра-что обозначает в компьютере?...
mvamz
28.03.2020 19:27
Отсортировать массив и найти количество различных чисел в нем.паскаль...
sxxaaa
11.08.2021 06:06
1001001+10101= 101101+1101101= 11000,11+11010,11= 10001000-1110011= 1101100-10110110= 110101,101-1001,111= 100001*111,11= 10011*1111,01= 1000000/1110=...
юла115
01.03.2020 09:35
Task 1. Grammar: You must convert Direct Speech into Indirect Speech. Do not forget to change the grammar tense when you rewrite the sentences in Indirect Speech.“His...
УЕД
04.03.2022 04:27
Викладіть хронологію найважливіших подій в історії Закарпаття протягом 1919-1939рр....
Kreizanova
20.02.2022 22:31
Where... you... tomorrowa) do/go b)will/goc)did/go d)have/gone...
texet1024
07.09.2020 09:42
Нужно изготовить из прволоки рамки прямоугольной формы.Стороны рамки 25 и 15см Сколько проволоки пойдёт на изготовление 3таких рамок...
калина007
07.09.2020 09:42
соч по казахскому 3 класс 5 задания 4 четверть за фегню бан! мое последния задания ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Var
A,b,max:integer;
Begin
Read(a,b);
If a>b then max:=a
Else max:=b;
Write(max)
End.