Составить программу в Паскаль.Вышина столба равна h.Улитка за денек подымется ввысь

Составить программу в Паскаль.
Высота столба равна h.
Улитка за день поднимется ввысь на х единиц.
За ночь спускается на y единиц.
Вышина за день одинакова I.
За сколько дней улитка подымется до конца?
Заблаговременно спасибо!!!

Задать свой вопрос
1 ответ
Program we
Var x,y,I,h,a,count:integer
begin
readln(x)
Readln (y)
Readln(h)
I:=0
Count:=0
Repeat
Count:=count+1
I:=I+x-y
Until Igt;=h
Written ('за ',сount', дней улитка подымется до конца ')
End
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт