Question

Здравствуйте. Задача по информатике, нужно составить программу на языке Паскаль
Ввести число. Если оно кратно 3, разделить его на 4, в противном случае умножить на 5.
​

Answer 1

Ответ:

Pascal

var

 a: integer;

 b: double;

begin

 writeln('Введите число:');

 readln(a);

 if a mod 3 = 0 then

   b:=a/4

 else

   b:=a*5;

 writeln(b:2:2)

end.