Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
putnikputen
08.08.2021 01:11 •
Информатика
Составьте программу, которая вводит с клавиатуры два числа и выводит их сумму, разность, произведение и частное.
Показать ответ
Ответ:
MinecraftAndSchool
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 оценок)
Популярные вопросы: Информатика
Ovhinoco
24.07.2020 00:09
Пусть дана произвольная целочисленная матрица порядка 10. Определите, имеются ли среди элементов, расположенных выше главной диагонали такие, которые превосходят любой из элементов,...
so4tfx
30.05.2023 23:41
есть проблема: а как установить TModLoder на сайте https://forums.terraria.org для терарии 1.4.0.5 , я делаю всё так как нужно но говорит что не та версия. Пытаюсь долго и ваш ответ...
Ikramhaus221
17.05.2021 14:24
1) Что является основным недостатком топологии «шина»? а) высокая стоимость сети; б) низкая надежность сети; в) большой расход кабеля; г) низкая помехозащищенность сети. 2) Что...
karicristle313
01.01.2023 08:27
Построить линейный алгоритм вычисления значения У по формуле У=(7Х+4)(2Х-2) проверить и в ответе указать каково значение У при Х=3. Написать программу на одном из известных Вам...
Xanuzbek
09.04.2020 18:10
Продумайте и оформите любым удобным для вас решения следующей задачи. 2 хозяйки купили 8 литров молока. У одной 5 л 6 литровом бидоне,у другой 3 литра в 5 литровом бидоне. Они решили...
Romabl4
28.05.2021 10:27
Вычислите,сколько байтов занимает на СD одна минута звукозаписи(частота дискретизации 44000,разрядность 16 бит)какова максимальная продолжительность звукозаписи на диске ёмкостью...
asdas6vj
31.10.2022 01:26
В один день Ира прочитала Х страниц, во второй — в 2 раза больше, чем в первый, а в третий — на Y страниц меньше, чем во второй день. Вывести на экран: 1. Сколько страниц прочитала...
Temirlan0958
31.03.2021 14:43
На языке программирования Python напишите программу,решающую следующую задачу:напишите функцию calc,которая принимает 3 аргумента: первые два- это числа а третий операция которая...
anyasaveleva2
03.07.2022 15:58
Выберите из предложенных вариантов основные записи алгоритмов *Словесное описаниеСхемаПострочная записьЧертежПоследовательность рисунковДиаграммаЗапись на алгоритмическом языкеБлок-схема...
werer1973
23.06.2020 22:14
Для чего служит группа элементов Таблица ссылок...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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;