Методические указания по программированию на языке Pascal. Юшков С.А - 4 стр.

UptoLike

ВУЗ: 

СамГУПС | Самара

Составители: 

Рубрика: 

Нет Да
Нет Да
4. Текст программы.
Program TAB;
{Составил .........}
Var A,B,D,K,P:Real; { описаниe переменных}
C:Integer;
Begin {начало программы}
Repeat {Оператор цикла с постусловием. Организуется цикл выполнения
перечня операторов, заключенных между словами repeat и until до
тех пор, пока не будет выполнено условие, указанное после until.}
WriteLn (‘Введи начало отрезка, конец отрезка, шаг’); {Оператор вывода
на экран строки заключенной в апострофах.}
ReadLn (A,B,D); { Ввод
числовых данных. Состоит из переменных в
скобках, которыми будут обозначены вводимые данные.}
Until (B>A) and (D>0);
C:=0;
A,B,D
B>A
и
C=0
K=A
KB
≤
C
конец
P=f
(
K
)
K, P
P>10
C=C+1
K=K+D

Страницы