1 a)
var
a: integer;
begin
readln(a);
if a mod 2 = 0 then
println('da')
else println('net');
end.
======================================
1 б)
var
a: integer;
begin
readln(a);
if a mod 10 = 7 then
println('da')
else println('net');
end.
================================
2 а
var
a: integer;
begin
readln(a);
if (a div 10+a mod 10) mod 3 = 0 then
println('da')
else println('net');
end.
======================================
2 б
var
n,a: integer;
begin
writeln('Введите число');
readln(n);
writeln('Введите a');
readln(a);
if (n div 10+n mod 10) mod a = 0 then
println('da')
else println('net');
end.
Если считать, что больные продолжают ходить в школу, заражая каждый день людей, и при этом они не выздоравливают через 7 дней, то так:
var vsego, boleet,den:integer;
begin
writeln('Сколько всего человек: ');
Readln(vsego);
boleet:=1;
while boleet<vsego do begin
den:=den+1;
boleet:=boleet*4+boleet;
writeln('День ',den, ' - заразились и болеют уже ', boleet, ' человек');
end;
writeln('Всего учеников: ', vsego, ', Через ',den, ' дней заболеют ', boleet, ' учеников (если бы их было столько), но т.к. их столько нет, да и школу бы всё равно на карантин закрыли, то будем считать, что заболеют все ', vsego);
end.
А всё, понял, 16 разных цветов карандашей
128/16 = кол-во синих карандашей в коробке
Смотри одинарная стрелка(в одну сторону) это устройства вывода информации(от компьютера), ввод (к компьютеру), а двойная это как и ввод, так и вывод информации.
Одинарные стрелки(к компьютеру):
сканер, веб-камера, микрофон, мышь, джойстик, тачка
Одинарные стрелки(от компьютера):
колонки, монитор, принтер, наушники, встроенный динамик
Двойные стрелки:
модем, дисковод
Решение: используем алфавитный подход кодирования информации.Считаем все символы (буквы , знаки, пробелы). Получаем40 – букв3 – знака препинания7 – пробеловИтого 50 знаков по 1 байту – 8 битI = 50*8 = 400 битВерный ответ 1
