Задача 7 Урок 10
Primary tabs
Задача 7 Урок 10
Перебирите в цикле все числа от 1 до 100, выведите на экран каждое 7-е число
var i: integer; begin for i:=1 to 100 do if ((i mod 7)=0) then writeln(i,' '); readln(); end
- Log in to post comments
- 722 reads
vedro-compota
Wed, 12/01/2021 - 18:35
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)