Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
влад2262
21.07.2020 01:37 •
Информатика
Написать программу в паскале даны два ненулевых числа. найти их сумму, разность, произведение и частное.
Показать ответ
Ответ:
kamil281102
13.07.2020 20:45
Var a,b,sym,raz,proiz,chast:integer;
begin
writeln ('a,b'); readln (a,b);
sym:=a+b;
raz:=a-b;
proiz:=a*b;
chast:=a/b;
writeln(sym,raz,proiz,chast);
end.
0,0
(0 оценок)
Ответ:
vasilzuk
13.07.2020 20:45
Program proga;
uses crt;
var a,b,c,d,e: integer;
f: real;
begin
writeln(‘Введите два числа’);
readln(a);
readln(b);
c:=a+b;
d:=a-b;
e:=a*b;
f:=a/b;
writeln(‘Сумма чисел ‘, c);
writeln(‘Разность ‘,d);
writeln(‘Произведение ‘,e);
writeln(‘Частное ‘,f);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
SnopcovaAlina07
22.10.2021 13:15
Напишите программу, которая в последовательности натуральных чисел определяет минимальное четное двузначное число. Программа получает на вход кол-во чисел в последовательности, а...
Манdarinka
31.01.2020 03:42
1)какой общий признак имеют летучая мышь, птица, бабочка и самолёт? 2)чем внешнее отличается от полицейского?...
Iulia1988
10.03.2020 18:50
Сколько существует различных символьных последовательностей длины 4 в четырехбуквенном алфавите {B, E, G, K}, которые содержат ровно две буквы E?...
жанель67
12.10.2020 10:23
Расшифруй телеграммы,которые почта передала не совсем точно труд нос котомка призы котел смета нудно выл и зал все...
GeCUri
12.10.2020 10:23
Какие из предложений являются высказываниями? определить их истинность. а)у каждой лошади есть хвост.б)я купил велосипед.в)вы были в театре? г)некоторые люди имеют голубые глаза...
aizazaliyaF
12.10.2020 10:23
Найти количество положительных чисел среди введенных с клавиатуры четырёх чисел в паскале!...
рррр194
05.03.2022 18:51
Написать звука- буквенный анализ слова украина только на укр языке...
Sofwork
22.03.2023 10:03
Какое пресноводное озеро самое большое на земле по площади а) мичиган б) гурон в) верхнее г) большое неволничье д) большое медвежье...
Рукалицоомг
22.03.2023 10:03
Вычислить ,используя правило деления суммы: 96 : 8...
seny0600
22.03.2023 10:03
Решите ! умножение и деление рациональных чисел вариант 1 1. выполните действия: 1) −2,1 ・ 3,8; 3) −14,16 : (−0,6); 2) −1 ⋅( −2 ); 4) −18,36 : 18. 2. выражение: 1) −1,6x ・ (−5y);...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln ('a,b'); readln (a,b);
sym:=a+b;
raz:=a-b;
proiz:=a*b;
chast:=a/b;
writeln(sym,raz,proiz,chast);
end.
uses crt;
var a,b,c,d,e: integer;
f: real;
begin
writeln(‘Введите два числа’);
readln(a);
readln(b);
c:=a+b;
d:=a-b;
e:=a*b;
f:=a/b;
writeln(‘Сумма чисел ‘, c);
writeln(‘Разность ‘,d);
writeln(‘Произведение ‘,e);
writeln(‘Частное ‘,f);
end.