Напишите программу, которая выведет на экран значение - вопрос №9838630 от antiangel18 18.06.2021 04:30

Question

Информатика: Напишите программу, которая выведет на экран значение true или false, в зависимости от того, является ли введенное число х четырехзначным или нет. сделайте

antiangel18 · Answer

procedure foo(n: integer; k: integer := 0); begin  if n = 0 then Print(k = 4)  else foo(n div 10, k + 1) end; begin  var N := ReadInteger();  foo(N) end....