Найти количество двузначных чисел оканчивающихся на 7. составить программу в pascal.

drad2005 drad2005    2   20.09.2019 02:10    1

Ответы
xxxxxxxx13 xxxxxxxx13  08.10.2020 03:37
Var count, i: integer;
begin
  count := 0;
  for i := 10 to 99 do
    if i mod 10 = 7 then
      count := count + 1;
  writeln(count);
end.
ПОКАЗАТЬ ОТВЕТЫ
Ненике Ненике  08.10.2020 03:37
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
  Range(17,99,10).Count.Println
end.

Результат
9
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика