| Автор | Ввод с клавиатуры переменной string в цикле |
|---|
var z:string;
begin
while true do
begin
read (z);
if z='x1' then break;
end;
writeln ('Угадали');
end.
Почему программа позволяет только один раз ввести переменную, вместо того, чтобы вводить её бесконечно, пока не угадается x1? С другими типами проблем нет. |
while (z=`x1`) do
begin
read (z);
end; |
для Раздетая:
Тогда уж
while (z<>`x1`) do
begin
read (z);
end;
При знаке равно, цикл даже не начнется. Но проблема всё равно остается. |
| А так? Все равно не то? |
для Раздетая:
Как? |
для Осколокъ:
Как ты написал |
для Раздетая:
Не-а. :( |
| Тогда отомсти компьютеру, разбей его! |
для Раздетая:
Он же не виноват, что я дурак. :( |
| Виноват! |
для Раздетая:
В любом случае, он мне еще нужен. |
while (z=`x1`) do
begin
read (z);
end;
типа умная? как будто разбираешься |
read (z);
имхо, readln надо |
для Deathcyborg:
Спасибо большое! Помогло) |
для Хёриммару:
У меня черный пояс по каратэ! |
| тема закрыта by Осколокъ (2014-11-09 18:06:14) |
|---|
