Вариантов всего 15+13+20+10+30+23+8+18=137:25=5.4
//PacsalABC.Net
// (c) NaaMan
var
s : integer;
begin
write('Введите число (10-999): ');
readln(s);
writeln('В числе ', s, ' ', s.ToString.Length, ' знака');
write('Число ', s);
if s mod 3 = 0 then
write(' кратно')
else
write(' не кратно');
writeln(' трём')
end.
Some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text
Пингвин - линукс, значит, Руслан с этой познакомился ОС.
Никита тогда с виндоусом, а Саша с мэкOS