Опубликовано 03.01.2018 по предмету Информатика от Гость

Написать програму к задачам 1) даны два ненулевых числа.Найти сумму,разность,произведение и часное их модулей

Ответ оставил Гость

var a,b:integer;
sum, raz, pr, ch: real;
begin
readln(a); readln(b);
sum:= abs(a) + abs(b);
raz:= abs(a) - abs(b);
pr:= abs(a) * abs(b);
ch:= abs(a)/abs(b);

writeln(sum, raz, pr, ch);
end.

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы