Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1-векторная
2-растровая
емкость неформатированного диска больше информационной емкости доступной для записи данных, т.е. отформатированного диска.
(если сумма цифр числа делится на 3, то число делится на 3 нацело)
var a, s: integer;
begin
s: =0;
writeln ('введите число');
while a< > 0 do
a: = a mod 10
s: =s+a;
end;
if s mod 3 = 0 then writeln ('делится') else
writeln ('не делится');
end.
Популярные вопросы