Составить программу маленькой вращающейся стрелки. в паскале. используя массивы состоящий из 4-х символов |,/

Ответ:

AlinaAok

08.07.2020 06:55

uses
CRT;

var
a: array [1..4] of char;
i: integer;

begin
i := 1;
a[1] := '|'; a[2] := '/'; a[3] := '-'; a[4] := '\';
while (true) do
begin
ClrScr();
Write(a[i]);
if (i = 4) then
i := 1
else
inc(i);
Sleep(250);
end;
end.

0,0(0 оценок)

Популярные вопросы: Информатика

assasin098

30.11.2022 19:01

Исправить ошибки в паскале program exp2; const m=5; n=3; type matr = array [ 1..m, 1..n ] of integer ; var m: matr ; k, i, j : integer ; p: real ; повторно объявленный идентификатор...

Fansik34324

30.11.2022 19:01

Какая операция нарушает признак,по которому подобраны все остальные операций из ниже списка. а)сохранение текста б)формотирование текста в)перемещение фрагмента текста...

anastasiya264

08.01.2021 20:50

Вдвумерном массиве четные элементы уменьшить на 2,а остальные заменить на 6...

ЬПОАСИ

06.01.2020 05:25

Проверить является ли число двузначным...

DavidWorld

14.03.2020 16:09

Приведите примеры ситуаций, в которых вы являетесь источником информации, приёмником информации. Какую роль за сегодняшний день вам чаще приходилось выполнять? Обоснуйте ответ....

skachkoa84

12.01.2023 03:46

2 Мбайт= ? К байт?81920 бит= ?Кбайт1.5 Мбайт=? Байт...

лиод1

18.03.2023 23:21

Примеры алгоритмов из повседневной жизни: 1, приготовления какого - либо напитка ( чая, какао, компота и т, д); 2, перехода через проезжую часть дороги; 3, подготовки к походу...

99880

04.02.2023 18:22

Прочитайте . спишите . нйдите в придложении слова , которые изменяются в единственом числе по . укажите над словами часть речи . пёстрый дятел несёт в клюве сосновую шишку...

rethd

04.02.2023 18:22

Раставте запятые 1)тишина громадных комнат нарушаемая только громким пением нагоняла зевоту 2)на митингах мы корреспонденты местной газеты узнаём много новостей 3)густой туман...

AQUA111

04.02.2023 18:22

Надо а)какова численность населения россии,если людей в возрасте от 50 до 64 лет в россии проживает примерно 30млн.? 1) около 98 млн. 2)около 7 млн. 3)около 143 млн.4)около179млн....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку