Предмет:
ИнформатикаАвтор:
marcianordmaАвтор:
stevemkdhАвтор:
chrissyАвтор:
landon195Автор:
buttontaolАвтор:
jenniferpricevar
sum, n, k, i: integer;
begin
sum := 0;
write('Введите n и k:');
read(n, k);
for i := n to k do
if(i mod 3 = 0) then
sum := sum + 1;
write(sum);
end.
Автор:
mattiefxb5Добавить свой ответ
Предмет:
Английский языкАвтор:
nick8Ответов:
Смотреть
Предмет:
ФизикаАвтор:
matthewcc0sОтветов:
Смотреть
Предмет:
МатематикаАвтор:
cesar711Ответов:
Смотреть