4 года назад

при запуске игры в полноэкранном режиме, вылезает черный экран с надписью режим не досткпен

Знания

Информатика

1 ответ:

Maksim Khohlov [113]4 года назад

0 0

Enter,нажми. и все........................

Читайте также

Составить программу на языке паскаль При поступлении в вуз абитуриенты , получившие "двойку" на первом экзамене , ко второму не

Guverss [7]

uses crt;

var i,count:integer;
a:array[1..15] of integer;
begin
randomize;
count:=0;
writeln('Первый екзамен сдало 15 человек ');
for i:=1 to 15 do
begin
a[i]:=random(5)+1;
if a[i] = 2 then inc(count);
end;
for i:=1 to 15 do writeln('Студент ',i,' написал на ',a[i],' балов '); //не обезательно
writeln('На екзамен допущено ',count,' человек!! ');
readln;

end.

0 0

4 года назад

1.Запишите полный путь файлу readme.txt, если известно, что он хранится папке HELP, вложенной папку HOME, находящейся на диске D

shmelalexander

D:/HOME/HELP/readme.txt ?

0 0

4 года назад

Вычислить алгебраическое выражение S=3x+29-10x. Если сумма больше 25, то вывести ее на экран, в противном случае вывести на экра

Malvina111

//PascalABC.NET 3.2

begin
var x := ReadlnReal('x =');
var s := 3*x + 29 - 10*x;
if s > 25 then write(s)
else write('?');
end.

0 0

2 года назад

Какой вид памяти очещается после выключения компьтера

Omgedes [50]

После выключения питания очищается энергозависимая память. В компьютере энергозависимой является оперативная память.

0 0

1 год назад

Прочитать ещё 2 ответа

Помогите! Срочно!!! 1) Дан массив отсорти. в порядке возрастания 2) Все эл-ты, кратных 10 заменить на 0. 3) Дан массив вывести 3

Michaelmm

// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!

begin
var n:=ReadInteger('n=');
var a:=ArrRandom(n,-99,99); a.Println;
a.OrderBy(t->t).Println; // 1
var b:=Copy(a); b.Transform(t->t mod 10=0?0:t); b.Println; // 2
Range(2,n-1,3).Select(i->a[i]).Println; // 3
Writeln('Элементов после max: ',n-a.IndexMax-1) // 4
end.

Пример
n= 20
8 37 88 31 -15 -26 -34 24 -31 -31 -91 -40 -49 -91 45 -30 -79 -78 -2 39
-91 -91 -79 -78 -49 -40 -34 -31 -31 -30 -26 -15 -2 8 24 31 37 39 45 88
8 37 88 31 -15 -26 -34 24 -31 -31 -91 0 -49 -91 45 0 -79 -78 -2 39
88 -26 -31 -40 45 -78
Элементов после max: 17

0 0

4 года назад

Прочитать ещё 2 ответа