Регистрация
nastuastar12
11.06.2020 20:08
Информатика
Есть ответ 👍

Ввести 2 числа. если их произведение отрицательно, умножить его на 2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.

204
323
Посмотреть ответы 2

Ответы на вопрос:

Falzy
Falzy
4,8(7 оценок)

var a,b: real;

begin 

  readln(a,b);

  if a*b< 0 then writeln(a*b*2) else writeln(a*b*1.5);

end.

simalivevl
simalivevl
4,4(69 оценок)
Program n1; var a,b,k,i: integer; begin readln(a,b); k: =0; for i: =a to b do if (i mod 7=0) or (i mod 10=9) then k: =k+1; write(k); end.

Популярно: Информатика