Информатика 9 класс.(Задачи по Паскалю)
В компьютер вводится 2 числа. Если они не равны, то вычислить их произведение, иначе каждое число уменьшить в 2 раза. После этого компьютер должен вывести результат и сообщение ЗАДАЧА РЕШЕНА.
Program lol(input, output);
var x, y, z:real;
begin
read (x, y);
if x <> y then
y:=x*y;
else
begin
x:=x/2;
y:=y/2;
end;
writeln (x=, x, y=, y, z=, z);
writeln (ЗАДАЧА РЕШЕНА);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
