Question

Как написать программу на языке Pascal которая после неправильного ответа переносит обратно в исходное положение пока не будет правильный ответ цикл короче как записать такой.

Answer 1

Пусть правильный ответ 5

Var a:integer;

Begin

A:=0;

While a<>5 do Readln(a)

<Остальная часть программы>

Answer 2

Логично было бы завершить код end `ом

Answer 3

ну это я сам уже знаю

Answer 4

Если человек взялся писать ответ, то это нужно делать качественно, и тут речь даже не идет о том, что это Вам или не Вам.