Помогите решить, пожалуйста!!!! Даю 40 баллов!

Помогите решить, пожалуйста!!!! Даю 40 баллов!

Задать свой вопрос
Злата
Могу прогу написать, метод сам составишь. Язык то хоть какой?
Вероника Православнова
Паскаль
Бекесова Эльвира
Терпеть не могу паскаль, мертвый язык
Vladislav
Знаю, язык ни о чем, но решать надобно, ничего не помню теснее, прости)
1 ответ

var

x,days,y:integer;

begin

readln(x)

y=0;

days=0;

while ylt;x do

begin

days=days+1;

y=y+4-3;

end;

writeln('количество дней :' , days);

END.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт