Var n, i, k:integer;
begin;
readln(n);
for i:=100 to 999 do
if (i mod 10) + (i div 100) + (i div 10 mod 10) = n then begin;
writeln(i);
k:=k+1;
end;
writeln(k);
end.
Linux-Операционная система
Текстовый редактор-Прикладная
Windows-Операционная система
macOS-Операционная система
Файловый менеджер-Прикладная
Антивирус-Утилита
Табличный процессор-Прикладная
Игровая программа-Утилита
бірінші жолда 10, 16; төртінші жолда 18,4,0; бесінші жолда 11,4,6, (әрі қарай білмеймін)