Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Yuska11
22.03.2022 23:10 •
Информатика
Составьте программу, которая вводит с клавиатуры два числа и выводит их сумму, разность, произведение и частное.
Показать ответ
Ответ:
умник1308
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 оценок)
Популярные вопросы: Информатика
Pudge3228
10.05.2023 16:27
Файл это имя программы или данныхпоименованная область внешней памятипрограмма,помещенная в оперативную память и готовая к исполнению...
ltandreeva2016
07.09.2021 20:57
Дан произвольный текст. Определить является ли он палиндромом (например шалаш-казак) ПАЙТОН...
Алла36
31.05.2023 17:50
Написав контрольную работу по математике, три сестры сообщили родителям следующее: Ира: «Я написала не на 5.» Светлана: «На этот раз я написала на 5». Лиза: «Я написала не...
елен9
05.02.2023 15:46
Что нужно добавить в программу и где, чтобы си n и q не равнялись 2,8,10,16.#include #include using namespace std; int todec(string s, int n){ int value = 0; for (int i = 0;...
polina200412
02.07.2020 15:37
Определите что будет напечатано в результате работы следующей программы var s,n: integer,begin s=1 for n=5 to 9 do s=s*3 write(s) end.( если можно , с объяснением)...
pashaShum12345
11.01.2020 08:41
На языке паскаль1)заполните массив а первыми n натуральными числами,начиная с x(ввести x с клавиатуры) в обратном порядке( начиная с конца массива)2)заполнить массив a первыми...
nikitabordkin
06.02.2020 04:43
Назовём данную таблицу TEMPERATURA. Месяц 1 2 3 4 5 6 7 8 9 10 11 12 Температура −21 −15 −9 1 8 14 21 26 10 7 −4 −10 Тогда TEMPERATURA [12]=...
ПрофессорЧерепашка
17.04.2021 02:25
Выпиши наречия, определи их лексико-морфологический разряд и образования. Пример: Придётся тащить челны волоком до речки Жаровли, — сказал Миняй» (no Н. Э. Гейнце) — волоуом...
Irishka2k17
14.05.2022 19:05
ГЕОМЕТРИЯ 8 КЛАСС Стороны параллелограмма равны 5 см и 4 см. От вершины тупого угла к большой стороне проведён перпендикуляр, который делит сторону на две части, одна из которых...
SpiritAlice
16.04.2021 18:20
Уравнения сложной структуры. Закрепление 91 Реши уравнения. Проверь. х: (15 : 2 )= 3 с*(5*2)540...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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;