из таблицы 2.1 те свойства естественных языков,которые затрудняют и не позволяют полностью автоматизировать перевод с одного языка на другой.как вы рассуждали?
146
355
Ответы на вопрос:
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.
Популярно: Информатика
-
Xmitejr03.01.2020 18:07
-
Updatek09.03.2023 12:21
-
даша363320.06.2023 01:48
-
ZaY40nOK27.06.2022 20:24
-
lololololololololool29.06.2020 13:19
-
GoldenAbzud06.06.2023 03:38
-
пматмг21.05.2021 18:00
-
adelina11016.01.2021 06:58
-
kristaile18.06.2022 18:20
-
semachelovekgood214.12.2020 20:05