Другие языки программирования и технологии

Паскаль 7 класс.

Подсказчики
goto....ЗАБУДЬТЕ ПРО ЭТУ КОМАНДУ!! ! ее используют только.. . ну в общем матом ругаться нельзя, вы поняли: )
При использовании этой команды код становится не читабельным.

Настрой в программе форматирование, так будет понятнее:
Program prim;
Var x, y: real;
Begin - закрывается последним end
x:=-1;
while x<=3 do - нафига ее менять на ветвление? проверка в цикле, все верно, можно заменить разве что на "for x:=-1 to 3 step 0.3 do" ну или на repeat ...until.
begin - закрывается предпоследним end
y:=3*x-2;
Writeln(y);
x:=x+0.3
end;
end.

Вообще советую подробнее ознакомиться в чем разница между циклами в паскале.
РТ
Ринат Тологонов
2 067
Лучший ответ
чем мой вариант не понравился?
два end потому что один закрывает цикл. а второй заканчивает программу.
<= - означает меньше или равно, потому что вот так - ≤ на паскале не записывается.
без него никак, или у тебя последнее значение не будет подставляться в функцию
грубо говоря (-1;3) или (-1;3]

хотя можно написать
while (x<3) or (x=3) do begin
....
end;
но эт не рационально

эммм.... куда уж проще... .

program prim;

label 1;
var
x, y: real;

begin
x := -1.3;
1:
x := x + 0.3;
y := 3 * x - 2;
Writeln(y);
if x < 3 then goto 1;
end.

только если так
Исмаил Д.
Исмаил Д.
2 741
правило паскаля: сколько begin'ов - столько и end'ов) ) а while - это условие. то есть выполнять пока икс меньше или равно трем.
Vugar Sharifov
Vugar Sharifov
460