Информационный сайт учителя Информатики и Экономики

Щёголевой А.П.

В помощь учителям, ученикам и деловым людям

Графические циклы в Pascal ABC

Автор Anna Опубликовано: 9 - апреля - 2020

Практическая работа по программированию для учащихся 9 класса.

Пример цикла с предусловием while “Пока”

Program primtr3;
Uses Crt, GraphABC;
var x:Integer;
begin
x:=1;
while (x<640) do
begin
line (x,0,x,400);
x:=x+10;
end;
end.

Поделиться ссылкой с друзьями:

Написать комментарий