Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
toby000
22.03.2022 22:15 •
Информатика
Напишите программу ввода трёх произвольных чисел x, y и z с клавиатуры. если x больше z, то вывести на экран сумму x и y, иначе вывести на экран значение z. !
Ответ:
Olegggg04
06.10.2020 08:21
Var
X,Y,Z:real;
Begin
Write('X = ');ReadLn(X);
Write('Y = ');ReadLn(Y);
Write('Z = ');ReadLn(Z);
if X > Z then WriteLn(X+Y)
else WriteLn()
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
nastorekhova20
24.05.2022 05:04
Вследующем примере определите свойства встречающейся информации.и объясните почему: идет вступительный экзамен по .вы попросили у соседа его решение .шпаргалка содержала...
juliajulia005
04.03.2021 04:35
Комплектующие компьютера Расположи эти устройства на временной оси в хронологическом порядке: 1945 1971 1982 1992 2021 FUGAKU GRID Compass SIMON IBM ENIAC DataPoint 2200...
vgfhdijubvn
04.10.2022 05:08
Из слов колесо, дом, покрышка, окна, двери, стекло, автомобиль образуйте шесть пар объектов связанных отношениями входит в состав. определите в каждой паре какой объект...
вера546
04.10.2022 05:08
Вкассу положили 2000 рублей. каждый месяц на имеющуюся в кассе сумму начисляют 1%. через сколько месяцев сумма достигнет 20 000 рублей? напишите программу на pascal abc....
Kot2351
27.10.2022 14:54
Какой будет остаток, если число 22 разделить на число 5?...
агаг1
02.01.2020 22:26
Составьте памятку о профилактике заражения ! !...
vladus20012
27.10.2022 14:54
)) . use the past continuous or the past indefinite. 1. i (wonder) whether you could lend me some money. 2. he (live) in paris during his last years. 3. we (walk) in silence...
VKaurovau
09.04.2020 00:38
Аорганах мужской половой системы лягушек созревают яйцеклетки...
соня1583
05.03.2022 11:18
Выражение 13a⁴-28a⁴+19a⁴. 7x²y²x+25xyx²y-18y³y...
LIMON4IKBRO
01.12.2020 15:23
Как переводиться слово на ,, путешествовать,, 30...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
X,Y,Z:real;
Begin
Write('X = ');ReadLn(X);
Write('Y = ');ReadLn(Y);
Write('Z = ');ReadLn(Z);
if X > Z then WriteLn(X+Y)
else WriteLn()
End.