очень срочно пожалуйста
вычислите значения переменных
A) x:=10;
y:=2 + x mod 3;
c:=15 mod 4 div y;
x:=y+c;
B) a :=15
b := a mod 3 div2
a :=a div b*2
Ответы на вопрос
Ответил MrMaks1096
1
Ответ:
Объяснение:
A) x:=10;
y:=2 + x mod 3; = 3
c:=15 mod 4 div y; =1
x:=y+c; = 4
B) a :=15
b := a mod 3 div2; = 0
a :=a div b*2; на ноль делить нельзя
uliana191703:
можешь пожалуйста ещё с одним заданием помочь?
вычислите значения переменных
A) x:=10;
y:=2 + x mod 3;
c:=15 mod 4 div y;
x:=y+c;
B) a :=15
b := a mod 3 div2
a :=a div b*2
A) Var s,k: integer;
Begin
s :=0;
for k := 5 to 10 s := s+10;
writeln(s);
End.
B) Var s,k: integer;
Begin
s :=0;
for k := 2 to 8 s := s+k;
writeln(s);
End.
C) Var k, i: integer;
Begin
k :=4;
for i := 1 to 4 do k:= 2*k + i;
writeln(k);
End.
D) Var y , i: integer;
Begin
y :=0;
for i := 1 to 3 do y := 2*(y+i);
writeln(y);
End.
Новые вопросы