Регистрация
настасимммаа
02.07.2021 23:14
Информатика
Есть ответ 👍

Правильно записать. у меня проблемы с паскалем( с клавиатуры вводятся два целых числа. сколько раз в их произведении встречается цифра 0

207
410
Посмотреть ответы 2

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

Dorefi
Dorefi
4,7(65 оценок)
Var a, b: integer; begin readln(a,b); a: =a*b; b: = 0; while(a > 0) do begin if a mod 10 = 0 then b: = b+1; a: = a div 10; end; writeln(b); end.
galina6969
galina6969
4,7(41 оценок)

var a,b: real;

begin

readln(a,b);

writeln('ploshad - ',a*b);

end.

 

var v,v0,t: real;

begin

readln(v,v0,t);

writeln((v-v0)/t);

end.

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