Помогите плиз.
Какое значение будет принимать переменная Y после выполнения фрагментов программы?
a) Var Y, X: integer;
Begin
Y: = 0; X: = 10;
While X > 0 do
Begin
X: = x – 2;
Y: = Y + X
End;
Writeln (‘Y=’,Y);
End.
b) Var Y, X: integer;
Begin
Y: = 1; X: = 15;
While X>5 do
Begin
X: = X – 3; Y: = Y * X
End;
Writeln (‘Y = ‘,Y);
End.
Нет комментариев
Ответы
Гость A) Y примет значение : 20
B) Y примет значение : 1944
3 комментария:
можно подробнее пж
Расскажете в каком плане "поподробнее" - you are welcome
В а и б.Как решал?
можно подробнее пж
Расскажете в каком плане "поподробнее" - you are welcome
В а и б.Как решал? Похожие вопросы
Информатика
Помогите построить таблицу истинности...
Информатика
Кто быстрее родился курица,или гейб ньеюль?...
Информатика
Жаны кумар магынасы пожалуйста )...
Информатика
Овощ которого называют вторым хлебом...
Список предметов
