Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
плата вроде как, если не ошибаюсь
(если сумма цифр числа делится на 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.
2.поиск текста на странице
4.изменение кодировки текста на странице
8.изменение размера шрифта для текста страницы
50 страниц.= 50*20 строк = 50*20*10 символов = 50*20*10 байт = 10 000 байт
10 картинок=10*100*200 пикселей = 10*100*200*3 байта = 600 000 байт
Популярные вопросы