1 бусинка самая маленькая 2 больше 3 больше 1,2 4 больше 1,2,3 а 5 больше 1,2,3,4. А 6 может быть равна любой из 1;2;3;4;5.
Язык программирования Pascal ABC
var n,k,i,j,d,c:integer;
label 1,2;
begin
1:writeln('Количество месяцев в календаре планеты Мульти:');
readln(n);
if (n>109)or(n<1) then
begin
writeln('Ошибка! Количество месяцев должно быть меньше или равно 109. Повторите ввод.');
goto 1;
end;
2:writeln('Номер дня на который приходится первое число первого месяца нового года:');
readln(k);
if (k>7)or(k<1) then
begin
writeln('Ошибка! Номер дня должен быть в диапозоне от 1 до 7. Повторите ввод.');
goto 2;
end;
d:=k;
for i:=1 to n do
begin
for j:=1+(k-1) to 30 do
begin
if (d=5)and(j=13) then c:=c+1;
d:=d+1;
if d>7 then d:=1;
end;
k:=1;
end;
writeln('Количество несчастливых дней в этом году: ',c);
end.
Ответ:
84
Объяснение:
Обозначим количество строк на странице текста через X. Тогда
4 * X * 60 * 16 бит = 315 кбит
X = (315 * 1024 бит) / (4 * 60 * 16 бит) = 84
<span>устройство ввода - сканер, видео- и вебкамера, микрофон, мышь, игровые устройства ввода (руль, джойстик, педаль, геймпад, танцевальный коврик).
устройство вывода - монитор, принтер, встроенный динамик, колонки, наушники</span>