Question

Начальная температура t1 градусов. Каждую минуту она вырастает на a градусов. За сколько минут она достигнет t2 градусов? ПАСКАЛЬ
СДЕЛАТЬ В ПАСКАЛЕ, ПОМОГИТЕ СРОЧНО!!

Answer 1

Ответ:

program test;

var t1,a,t2:real;

k:integer;

begin

read(t1);

read(a);

read(t2);

k:=0;

repeat

t1:=t1+a;

k:=k+1

until t1>=t2;

write(k)

end.

Объяснение:

используем цикл с постусловием (repeat ... until)

в переменной k будем подсчитывать количество минут