Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Дима6u9432
06.03.2023 14:05 •
Информатика
Составьте программу, которая вводит с клавиатуры два числа и выводит их сумму, разность, произведение и частное.
Показать ответ
Ответ:
AliceMagic
06.10.2020 16:51
Uses crt;
Var a,b,summ,razn,pro: Integer;
chas: Real;
Begin
Write('Введите два числа: ');
Readln(a,b);
summ:=a+b;
razn:=a-b;
pro:=a*b;
chas:=a/b;
Write('Сумма: ', summ, ', разность: ', razn, ', произведение: ', pro, ', частное: ', chas)
End;
0,0
(0 оценок)
Популярные вопросы: Информатика
Sofiaaaaaaaaaaa1
15.04.2023 06:32
Логическое выражение, являющееся истинным при любом наборе входящих в него переменных, называется тождест-венно истинным. Убедитесь, что следующие логические вы-ражения являются...
gladiatorcor
24.05.2023 09:24
Кто ненавидит Аурума?...
FUpp
06.05.2023 22:13
Даны катеты прямоугольного треугольника a и b. Найти его гипотенузу c = √a² + b². Если с 10, вычислить и вывести экран периметр треугольника P = a + b + c. Я начал делать не...
sahrona04
14.03.2021 23:06
1) √x^2+y^2/x*y 2)x-y/|x|-|y| 3)√|x|+|y|/√x^2+1...
Liana03102000
12.08.2022 02:05
Составь алгоритм решения класса поиска площади прямоугольного пола в помещениях жилого дома.используй план-схему квартиры...
emelik96
12.05.2020 03:01
Для чого призначений компонент Memo?...
mixfix2017
03.05.2022 08:24
5. Что понадобится для того, чтобы роботизировать террариум? (ящик для мелких пресмыкающихся и пресноводных) пресмыкающихся и земноводных)А. Датчик движения, видеокамера и датчик...
SillyLittleFool
18.08.2020 03:19
Составьте краткий рассказ о британских школах! просто если я не расскажу то мне за четверть 3 поставят!...
asya343434
18.08.2020 03:19
Какими ископаемыми остатками животных калининградской местности можно пополнить краеведческий школьный уголок или музей?...
оеькллал
18.08.2020 03:19
1) what is the official name of great britain? 2) what is the area of the great britain? 3) name the administrative units of great britain. 4) what are their main cities? 5)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var a,b,summ,razn,pro: Integer;
chas: Real;
Begin
Write('Введите два числа: ');
Readln(a,b);
summ:=a+b;
razn:=a-b;
pro:=a*b;
chas:=a/b;
Write('Сумма: ', summ, ', разность: ', razn, ', произведение: ', pro, ', частное: ', chas)
End;