Var num:integer;
begin
writeln('0 - выход');
repeat
write('Введите число: ');
readln(num);
if(((num mod 11) = 0) or ((num mod 17) = 0)) then writeln('Это число делится на 11 или 17')
else writeln('Это число не делится ни на 11, ни на 17');
until num = 0;
end.
1.
75кб=600000бит
48*40=1920
600000:1920=312.5
312.5:8=39
F(153) = F(152) + 153 = F(151) + 152 + 153 = F(150) + 151 + 152 + 153 = ... = F(1) + 2 + 3 + ... + 153 = 1 + 2 + 3 + ... + 153 = 153 * 154 / 2 = 11781
А) металл ;цифровая
б) бумага (картон); цифровая (индекс), текстовая, графическая
в) бумага; текстовая, цифровая
г) бумага; цифровая, текстовая, графическая
д)оптический или цифровой диск; видео, аудио.
насчет диска точно не знаю, извини))
Суббота
В календаре посщитать можно