Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
4
Объяснение:
выполнится 4 раза до тех про пока логическое выражение будет оставаться ложным
а)400*2,5=1000кб
б)64: 2,5=25,6=25(страниц)
в)нужен диск cd-r ,cd-rw
1.
program xxx;
var i, n : integer
begin
writeln ('введите число n=');
readln (n);
writeln ('делители числа: ');
for i: = 1 to n do
if n mod i = 0 then writeln (i);
readln
end.
Популярные вопросы