Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
dinamis05
16.06.2020 11:48 •
Информатика
Написать программу в паскале даны два ненулевых числа. найти их сумму, разность, произведение и частное.
Показать ответ
Ответ:
Vera20000
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 оценок)
Ответ:
Potashka
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 оценок)
Популярные вопросы: Информатика
katya022
29.05.2023 18:18
В среде программирования ABCPascal набери текст программы для решения задачи: 20 учащихся писали диктант по русскому языку. Составить программу, подсчитывающую...
Куку1560
24.03.2021 12:57
Дан массив а(10), заполненный датчиком случайных чисел. Найти минимальный элемент массива....
raymondbaby
29.10.2021 10:36
Азия мемлекеттерінде қандай ем қолданады? A. медицина мен халық емін B. дәстүрлі ем C. халық емін D. медицина емін 2.Табиғи жолмен алынған дәрілерді тұтыну туралы...
Sergeyii
18.10.2022 10:53
Посмотрите список языковых функций a-f. Какие фразы вы можете использовать, чтобы поприветствовать, представиться и т. д....
dfhhu
30.05.2021 02:34
По уравнению координаты х(t)=12-4t oпределить вид движения и найти координату тела через 35 с. Решите полностью, а то в интернете нигде нет полного решения, и везде...
КристинаCадовски
18.07.2021 22:14
ОПРЕДЕЛИТЕ ОДНОРОДНЫЕ И НЕОДНОРОДНЫЕ ОПРЕДЕЛЕНИЯ. РАССТАВЬТЕ ЗНАКИ ПРЕПИНАНИЯ 1. Тайга расступилась вечерней берёзовой опушкой.2. Пролетела не то серенькая не то...
tryx1
17.11.2020 07:35
Негізіне түсі,материалы және бет бедері бойынша ерекшеленетін материалдар жабыстырылатын бейнелеу өнеріндегі техникалық тәсіл қалай аталатынын анықта. Жапсырма...
Diana111111112
22.10.2021 16:41
Were are they from? How many children have they got? the house very quiet?Has mr.Lewis got a job?Have they got any pets?Have the children got different rooms and...
millyby1
24.08.2021 01:26
I would recommend the book ...... was written by It is ...It is about ...The story is set ...The main characters in the book are ...I particularly love reading...
Ganshit
10.01.2021 18:14
Как как вы поняли В чём смысл притчи ? Скажите позиция Какой из трёх путников вам ближе и почему ?когда юноша говорил о чистоте души и тела что имел в виду ?Как...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.