даны 2 вещественных числа. Напишите программу которая уменьшает первое число в 5 раз если она больше второго

Есть ответ
18.12.2022
414

Ответ


Program z1;

var a,b:integer;

begin

writeln('ведите числа-э);

readln(a,b);

if a>b then

begin 

a:=a-1; 

end;

writeln('a=',a);

end. усё....

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.