Выполните тест: Операторы языка Pascal
Презентация: Презентация 5
Вопросы:
1) Какой оператор выполняет цикл с проверкой условия? (7 сл.)
2) Приведите пример когда происходит зацикливание? (8 сл.)
3) Выполните задания на сл. 9. Ответы запишите в тетрадь.
4) сл. 11. Решите задание в PascalAlgo.
5) Цикл с постусловием - .... (сл. 17)
6) Выполните задания на сл. 20. Ответы запишите в тетрадь.
7) Решите задачи из группы WHILE
<от>
Program t5na4;
var
n, n1, s, x : integer;
Begin
write('Введите многозначное число');
readln(n);
n1:=n;
s:=0;
while n <>0 do begin
x:= n mod 10;
s:=s+x;
n:=n div 10;
end;
writeln ('Сумма цифр числа ',n1,' = ',s);
end.