Регистрация Главная Сообщество
Сообщения за день Справка Регистрация
Навигация
Zhyk.org LIVE! Реклама на Zhyk.org Правила Форума Награды и достижения Доска "почета"

помогите пожалуйста

-

Школа Читера

- Основы основ - начинаем писать статьи для начинающих с целью создания полноценного раздела

Ответ
 
Опции темы
Старый 08.06.2012, 21:42   #1
 Разведчик
Аватар для ylkiora
 
ylkiora вызывает надежду
Регистрация: 12.01.2011
Сообщений: 0
Популярность: -47
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию помогите пожалуйста

готовясь к ГИА по информатике, столкнулся с проблемой.
Вот задача: В компьютер вводят вес, поднятый каждым тяжелоатлетом на соревнованиях. Признаком конца ввода данных является отрицательное число. Сосчитайте число спортсменов, которые смогли поднять больше 150 кг.
задача на паскаль

у меня вышло так.
var
z,x:integer;
begin
z:= 0;
writeln('введи вес поднятый спортсменом');
readln(x);
while x>0 do
if x>= 150 then z:= z+1;
writeln('количество спортсменов удовлетворяющих условию = ',z);
readln;
end.

проблема в том, что при проверке вводится только одно значение, а потом все виснет, и можно только закрыть окно.
вопрос в том, это у меня ошибка или сам паскаль корявый?
заранее спасибо.

Добавлено через 15 часов 45 минут
ап

Последний раз редактировалось ylkiora; 09.06.2012 в 13:27. Причина: Добавлено сообщение
  Ответить с цитированием
Ответ


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите, пожалуйста люди пожалуйста! DeN_PrO23 Общение и обсуждение CrossFire 7 05.11.2011 22:26
[Помогите!] Помогите пожалуйста Проклятие Общение и обсуждение Aion 2 17.07.2011 19:49

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 17:53.

Пишите нам: forum@zhyk.ru
Copyright © 2025 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net