Помогите пожалуйста по информатике.
N:=0
S:=0
While s<=47 do
Begin
N:=n+1
S:=s+2
End
Write(n)
Нет комментариев
Ответы
Гость Var N,S: integer;
begin
N:=0;
S:=0;
while s<=47 do
begin
N:=n+1;
S:=s+2;
end;
write(N);
end.
Ответ: 24
Нет комментариев
Похожие вопросы
Информатика
Замените все четные элементы одномерного массива на их квадраты, а нечетные увеличьте вдвое...
Информатика
Помогите!!!! СРОЧНО.......
Информатика
Что такое интерфейс и его виды...
Список предметов
