Информатика 9 класс.(Задачи по Паскалю)
В компьютер вводится 2 числа. Если они не равны, то вычислить их произведение, иначе каждое число уменьшить в 2 раза. После этого компьютер должен вывести результат и сообщение ЗАДАЧА РЕШЕНА.
Ответы на вопрос
Ответил guslyakov98vaddam
0
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.
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.
Ответил andreevaksenia2
0
Спааааасибо))
Ответил andreevaksenia2
0
Расцеловать тебя готова
Ответил andreevaksenia2
0
А Вы можете помочь составить алгоритм?
Ответил guslyakov98vaddam
0
могу попробовать
Новые вопросы
История,
2 года назад
Биология,
2 года назад
Экономика,
9 лет назад
Литература,
9 лет назад
Математика,
9 лет назад