Помогите пожалуйста составить программу подсчета силы тяжести если m меняется от a до b с шагом h паскаль

Ответы

Ответ дал: minmen2013
0

var


 h, a, b, m: integer;


 


begin


 readln(a, b); //вводим a, b с клавиатуры


 readln(h); //вводим h с клавиатуры


 m := a; //приравниваем значение массы к а


 while m <= b do //пока масса меньше b цикл будет выполнять повторения


 begin


   write(m * 10, ' '); //выводим значение силы тяжести


   m += h; //увеличиваем массу на шаг


 end;


end.

Ответ дал: artes135art
0
А как нибудь можно расписать что за что отвечает?
Ответ дал: minmen2013
0
Отредактировал ответ
Вас заинтересует