1. Информатика
  2. Программа abcpascal: ввести

Программа abcpascal: ввести с клавиатуры два числа, если произведение этих чисел положительно, то найти их разность, а иначе найти их деление.

Никитка987 Никитка987    3   30.09.2019 04:10    2

Ответы
2346573920316 2346573920316  09.10.2020 04:35
PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var (a, b) := ReadReal2;

 if a * b > 0 then Println(a - b)

 else Println(a / b)

end.


Программа abcpascal: ввести с клавиатуры два числа, если произведение этих чисел положительно, то на
Программа abcpascal: ввести с клавиатуры два числа, если произведение этих чисел положительно, то на
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ДуанбекМариям ДуанбекМариям  29.04.2021 09:59
Пояснити що написано у строках з 7 по 13 включно. Відравити у текстовому файлі поясненя.1#include iostream 2using namespace std;34int main()5{6 setlocale(0, );7 double...
АлинаБречко АлинаБречко  20.10.2020 03:29
2. Информационное сообщение объемом 3 Кбайта содержит 6144 символа. Сколько симво- лов содержит алфавит, при которого было записано это сообщение?2) 16;3) 8;4)32.​...
Fox1114 Fox1114  20.10.2020 03:30
UHH UUЯsa BP 20000 2400 4 2 400 небцами Картина асыл7. Из предложенных слов и фраз составьте известные пословицы и поговорки :1_3 _2_3_1. Уговор2. Денег наживёшь3. на...
AlexCairon5 AlexCairon5  22.05.2019 23:47
Решить 3-ью . по программе pascal...
СарварИбрагимов11 СарварИбрагимов11  22.05.2019 23:45
Большое (1.) при перекодировании сообщения из 8 битной кодировки в 16-битную информационный объём увеличился на 416 бит. определите количество символов в сообщении1)26...
Есения1511 Есения1511  22.05.2019 23:36
Синформатикойлучше с решением...
Lolololololololol4 Lolololololololol4  22.05.2019 23:31
Замените break , нужно, я написал подруге программу, а её учитель говорит что она должна это чем-то заменить, но я хз чем program n32; var a,b,c: integer; begin readln(c);...
vlgonotrada vlgonotrada  22.05.2019 23:28
Составить таблицу, которая позволяет автоматизировано начислять стипендию студентам своей подгруппы. считать, что начисление стипендии происходит в зависимости от оценок,...
ALEXCOOL613 ALEXCOOL613  22.05.2019 23:25
Выберите несколько вариантов ответа выберите верные утверждения )) 20...
sashok509 sashok509  07.04.2019 10:05
Составить программу для вычисления f=2*a*a+|6-a|+293a...

Популярные вопросы