Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
AbashkinaEvgenia98
30.05.2020 22:26 •
Информатика
Запишите программу на языке Турбо Паскаль вычисления суммы, если a > b в противном случае вычисляет частное.
Ответ:
Aina2006
14.10.2020 17:24
var a,b,c: real;
begin
readln(a,b);
if a>b then c:=a+b else c:=a/b;
write(c)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
МЯУСИМ2007
27.11.2021 21:28
Составьте программу, реализующую эпизод сказки: спрашивает, куда предпочитает пойти герой (налево, направо или прямо) и печатает, что его ждёт в каждом случае...
shonchak
30.08.2020 09:14
Определите, какое число будет напечатано на экране в результате выполнения следующей программы: var a, b: integer; begin a : = 0; b : = 2; while b 32 do begin a : = a+1; b...
Даша182005
30.08.2020 09:14
Дано натуральное число вычислить y=2*4*)...
violetta1888
30.08.2020 09:14
Исполнителя удвоитель две команды, которым присвоены номера: 1. прибавь 1, 2. умножь на 3. первая из них увеличивает число на экране на 1, вторая утраивает его. например, 1222...
Апслтел
17.11.2021 13:25
-(1+0)^(0+0)+1 Решение пошагово...
androsova2016
10.11.2021 12:47
Вклад православной церкви в окончание смутного времени....
Weronica98
10.11.2021 12:47
Выполните деление можно столбиком 14: 112= 45: 6= 0,1242: 69=...
musaaysu17
10.11.2021 12:47
Умоляю решить пример 8/30 от ч =...
dashamaltseva64
10.11.2021 12:47
Вкомнате находится стол высотой 70 сантиметров высотой метра 4 класса, чему равна работа силы тяжести при перемещении 120 сантиметров, масса 300 граммов, совершенные на столе...
djam111
24.12.2021 09:43
Выделить граммотмическую основу . оставаться ей в крепости подвластной пугачеву и швабриным было невозможно . озеро около берегов было засыпано ворохами жёлтых листьев...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a,b,c: real;
begin
readln(a,b);
if a>b then c:=a+b else c:=a/b;
write(c)
end.