Предмет: Информатика,
автор: nikkster73
Распишите.
1.определите значение целочисленных переменных x и y после выполнения фрагмента программы
х := 19;
у := 3;
z := у*2;
у := х mod у;
х := х - z;
у := у + z;
Ответы
Автор ответа:
0
var
x, y, z: integer ;
begin
x := 19;
y := 3;
z := y * 2;
y := x mod y;
x := x - z;
y := y + z;
writeln('x = ', x, ', y = ', y, ', z = ', z);
end.
Вывод
x = 13, y = 7, z = 6
x, y, z: integer ;
begin
x := 19;
y := 3;
z := y * 2;
y := x mod y;
x := x - z;
y := y + z;
writeln('x = ', x, ', y = ', y, ', z = ', z);
end.
Вывод
x = 13, y = 7, z = 6
Интересные вопросы
Предмет: Литература,
автор: soliargalina
Предмет: История,
автор: colatop17
Предмет: Математика,
автор: klkkkkkkkkkkkkk
Предмет: Биология,
автор: SherlockAlive
Предмет: Физика,
автор: Sonechka777