Создать программу на Object Pascal. С помощью цикла for вывести значения от x0=0,5 до x=1,5 с шагом dx=0,25.

(Да, в Pascal нельзя задать шаг, но в этом и суть задания)

Question

Нозоми

28 июля, 12:42

+5

Ответы (1)

Знаете ответ на вопрос?

Дизелия · Answer 1

var

x: real;

i: byte;

begin

x : = 0.5;

for i : = 1 to 5 do

begin

Write (x,' ') ;

x : = x + 0.25

end

end.

Создать программу на Object Pascal. С помощью цикла for вывести значения от x0=0,5 до x=1,5 с шагом dx=0,25.(Да, в Pascal нельзя задать шаг, но в этом и суть задания)