дано цілі числа a та b. вивести результат і хід обчислень суми, різниці, добутку, частки цих чисел
Ответы
Ответ дал:
0
var a,b:integer;
begin
write('a= ');
read(a);
write('b= ');
read(b);
writeln('сумма ', a+b);
writeln('разность ', a - b);
writeln('произведение ', a*b);
if b=0 then
writeln('Ошибка! Деление на 0')
else
writeln('деление ', (a / b):0:3);
end.
begin
write('a= ');
read(a);
write('b= ');
read(b);
writeln('сумма ', a+b);
writeln('разность ', a - b);
writeln('произведение ', a*b);
if b=0 then
writeln('Ошибка! Деление на 0')
else
writeln('деление ', (a / b):0:3);
end.
Ответ дал:
0
Почему две "разности" ? И почему по-русски написано????
Вас заинтересует
2 года назад
7 лет назад
7 лет назад
9 лет назад