Ну в общем то, просто выведет остаток от деления k/7, так как mod - отбрасывает целую часть числа.
//PacsalABC.Net
// (c) NaaMan
var
s : integer;
begin
write('Введите число (10-999): ');
readln(s);
writeln('В числе ', s, ' ', s.ToString.Length, ' знака');
write('Число ', s);
if s mod 3 = 0 then
write(' кратно')
else
write(' не кратно');
writeln(' трём')
end.
Все компьютеры в локальной сети соединены линиями связи. Геометрическое расположение линий связи относительно узлов сети и физическое подключение узлов к сети называется физической топологией. В зависимости от топологии различают сети: шинной, кольцевой, звездной, иерархической и произвольной структуры.
В настоящее время в локальных сетях используются следующие физические топологии:
физическая "шина" (bus)
физическая “звезда” (star)
физическое “кольцо” (ring)
физическая "звезда" и логическое "кольцо" (Token Ring)
Один сервер обрабатывает полмиллиона запросов за секунду. Отсюда 6 серверов умноженное на 500 000 - сколько 6 серверов обработают за секунду. И полученное значение, умножить на 6 секунд. Ответ: 18 000 000 запросов