1.Сколько раз будет выполнен oператop write?
var i,j,s:intrger;
begin
S:=0;
for i:=15 to 18 do
begin s:s+1;
write(i:4,s:5);
end;
end.
2.чему будет равно s после выполнения программы.
var i,n,k,s,a:integer;
begin
S:=0;
fo4 i:4 to 8 do if i mod 4=0 then s:==s+i;
writeln(s);
End.
Нужны трессировочные таблицы
Ответы
Ответ дал:
0
1. Оператор write будет выполнен 4 раза.
2. Значение S будет равно 12
Трассировочные таблицы - во вложении
2. Значение S будет равно 12
Трассировочные таблицы - во вложении
Приложения:
![](https://st.uroker.com/files/7f8/7f81c7b253aecab83e1d1a908d5332bf.jpg)
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад