Определите значение переменной К после выполнения фрагмента программы
k:=0;
x:=1;
while x:=20 do
begin
if x mod 5 = 0
then k:=k+1;;
x:=x+1;
end;
writeln (k)
vlaDen74:
Допущена ошибка в 3ей строке, а именно присвоение в условии :=
Ответы на вопрос
Ответил zhoramalushevpegkpk
0
Ответ:
4
Объяснение:
x mod 5 = 0 означает деление без остатка, следовательно, по условию цикла (while x<=20) и шага увеличения его основной переменной (x:=x+1) на 1 за итерацию, можно просчитать, что результатом станет количество чисел в диапазоне 1 - 20, у которых 5 выступает полным делителем.
Сам результат считается просто: 20:5=4
Новые вопросы