Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Rf123123
04.02.2021 12:22 •
Информатика
Даны два числа a и b.составьте программу , которая вычисляет сумму, разность, произведения и частное этих чисел и выводит результат на экран
Ответ:
AlesyaDreamer
04.08.2020 09:28
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var (a,b):=ReadReal2();
writeln('(',a,')+(',b,')=',a+b);
writeln('(',a,')-(',b,')=',a-b);
writeln('(',a,')*(',b,')=',a*b);
write('(',a,')/(',b,')=',a/b);
end.
0,0
(0 оценок)
Ответ:
GoRussia228
04.08.2020 09:28
Var
a, b:integer;
begin
read(a,b);
Writeln('Сумма: ', a + b);
Writeln('Разность: ', a - b);
Writeln('Произведение ', a * b);
Writeln('Частное ', a / b);
end.
Пример:
15 2
Сумма: 17
Разность: 13
Произведение 30
Частное 7.5
0,0
(0 оценок)
Популярные вопросы: Информатика
Huran
08.03.2021 16:13
2.Как сохранить созданный рисунок Графическом редакторе Paint?Напиши команды. 3.Запиши назначения кнопок поворота фрагмента рисунка. Помагите . ...
myster2
22.06.2020 20:12
Написать программу которая находит произведение n первых натуральных чисел . число n вводится с клавиатуры. выполнить программу для n=9 записать результат....
rkarina79
22.06.2020 20:12
Язык pascal abc. напишите программу: дан двухмерный массив a[1..m,1..n]. написать программу построения одномерного массива b[1..m], элементы которого соответственно...
djekichan123
22.06.2020 20:12
Язык borland c++ никаких паскалей написать программу,позволяющую для заданного одномерного массива а из n вещественных или целых элементов реализовать обработку массива.длина...
muroslavka2003
07.04.2022 19:43
Как составить алгоритм выражение 9-(3+2)...
АРТЕМІДА555
07.04.2022 19:43
Доступ к файлу come.doc.находящемуся на сервере doc.net.осуществляется по протоколу ftp. фрагменты адреса файла закодированы буквами от а до ж запишите последовательность...
mssuslova1980
07.04.2022 19:43
Составьте программу для определения,что больше площадь круга радиусом a или площадь квадрата со стороной a-значения числа a вводятся с клавиатуры(площадь круга вычисляется...
husravh323
23.10.2021 08:33
Значение выражения -0,3а+2 при а=-7...
лолололололпке
23.10.2021 08:33
Народ сколько в вашем городе стоит 1 конфета рафаэлло?...
аленаzm
23.10.2021 08:33
Кто читал джералд дарелл из книги землянично -розовый дом какие черты настоящего исследователя присущи герою? ответа, за ранее !...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
//Версия 3.3, сборка 1611
begin
var (a,b):=ReadReal2();
writeln('(',a,')+(',b,')=',a+b);
writeln('(',a,')-(',b,')=',a-b);
writeln('(',a,')*(',b,')=',a*b);
write('(',a,')/(',b,')=',a/b);
end.
a, b:integer;
begin
read(a,b);
Writeln('Сумма: ', a + b);
Writeln('Разность: ', a - b);
Writeln('Произведение ', a * b);
Writeln('Частное ', a / b);
end.
Пример:
15 2
Сумма: 17
Разность: 13
Произведение 30
Частное 7.5