Program spos; uses crt; var numb:array [1..100] of byte; // для последовательности чисел i,f:integer; //счетчик и переменная в качестве флага begin randomize; f:=0; for i:=1 to 100 do numb[i]:=random(101);// задает последовательность
for i:=1 to 100 do begin write(',',numb[i]); // вывод на экран последовательность(можно удалить) if (numb[i]=77)then f:=1; // в случае удачной проверки f:=1, в противном останется 0 end; if f=0 then writeln('Yes') else writeln('No');
end.
program spos; uses crt; var numb:array [1..100] of byte; // для последовательности чисел i,f:integer; //счетчик и переменная в качестве флага begin randomize; f:=0; for i:=1 to 100 do begin numb[i]:=random(101);// задает последовательность write(' ',numb[i]);//вывод на экран, можно удалить end; writeln; i:=0; repeat i:=i+1; if (numb[i]=77)then f:=1; // в случае удачной проверки f:=1, в противном останется 0 until i<100; if f=0 then writeln('Yes') else writeln('No');
Подробно? надеюсь это не издевательство... я конечно понимаю что опыта даже в чтении документации по линуксу не было но все таки, есть лишь одно сходство обе они операционные системы, тоесть они обе обеспечивают взаимодействие юзера и железа и это все, все остальное же это различия, ибо начиная с того какие файлы и их расширения нужны как для работы системы так и для запуска приложений(и это я молчу про пакеты программ каждой ос) а заканчивая тем что у линукса(если ниче не поменяли) открытый програмный код а у винды закрытый, о том что ядра у систем разные и принципы взаоимодействия я промолчу, почитай информацию о файловых системах, думаю ее одной будет достаточно чтобы на весь урок загрузить препода задавшего такой глупый вопрос
