2 подписчика
Даны два числа. Найти их произведение.
Var x,y,z:integer; - описываем переменные
begin
writeln ('введите слагаемые'); - выводим пояснение
read (x,y); - вводим значение переменных (множителей)
z:=x*y; - выполняем подсчёт.
writeln (z); - выводим произведение.
end. - заканчиваем программу.
Около минуты
5 февраля 2024