Pascal (ДАЮ 34 БАЛЛА) (ИЗИ НОМЕР)составить программу которая выводит на экран

Pascal (ДАЮ 34 БАЛЛА) (ИЗИ НОМЕР)

составить программку которая выводит на экран целые числа от 1 до 15


Надо cделать 2 программы:
Одну через "repeat" и иную через "while"


ПЖЖЖЖ:)

Задать свой вопрос
1 ответ

Программка с while

program raf105;

var a:integer;

begin

while alt;gt;15 do

begin

 a:=a+1;

 writeln(a);

end

end.

Программка с repeat

program raf105;

var a:integer;

begin

repeat

 a:=a+1;

 writeln(a);

until a=15;

end.

Написано на языке PascalABC.NET

Punanova Elena
Спасибо ;)
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт