Напишите программу на языке Паскаль.Даны два целых числа a и b, если а больше b, то из a вычесть b. Если b больше а, то к b прибавить 10. Если числа равны, то посчитать произведение этих чисел.
203
ОТВЕТЫ
program n1;
var
a, b :integer;
begin
read(a, b);
if a>b then
writeln(a-b);
if a=b then
writeln(a*b);
if a<b then
writeln(b+10);
end.
9
Отв. дан
Mnekus
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Математика
Mejar
Источник генерирует знак x1 и x2с вероятностями р(x1)=0,33 и ...
2018-09-25 00:00:00
Марк
эссе на тему Как я понимаю что такое Вирус ...
2018-09-25 00:00:00
Екатерина
Оцените информационный объём моноаудиофайла длительностью 1 с при частоте ...
2018-09-25 00:00:00
Никита
Перевести число 40 из десятичной системы счисления в четверичную ...
2018-09-25 00:00:00