GT3
10.03.2021 18:26
Информатика
Есть ответ 👍

из таблицы 2.1 те свойства естественных языков,которые затрудняют и не позволяют полностью автоматизировать перевод с одного языка на другой.как вы рассуждали?

146
355
Посмотреть ответы 1

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


const

  m = 999;

var

  i, n, count: integer;

begin

  write('n = '); readln(n);

  count : = 0;

  for i : = 100 to m do

  begin

    if (i mod 10) + (i div 10) mod 10 + (i div 100) mod 10 = n then

          inc(count);

  end;

  writeln('count = ', count);

  readln;

end.

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