М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Составьте в pascal abc сложную(красивую с многими элементами и прочим прочим что б всего было много) граффическую программу!

👇
Ответ:
bviktoria4567
bviktoria4567
16.01.2023

Вот моя игра .  Угадай число.

 

program k2game;
uses crt;
var i,a,n:integer;
begin
textbackground(14);
clrscr;
gotoxy(33,2);
textcolor(4);
writeln('Игра "Угадай число!" ');
delay(400);
textcolor(5);
gotoxy(23,4);
writeln('1. Компьютер загадывает число от 0 до 9.');
delay(840);
textcolor(5);
gotoxy(23,5);
writeln('2. Ваша задача - угадать это число!');
delay(840);
textcolor(5);
gotoxy(23,6);
writeln('3. Не забывайте, что у вас всего две попытки!');
delay(640);
textcolor(5);
gotoxy(23,7);
writeln('4. Если же вы ошиблись, то компьютер даст вам подсказку.');

randomize;
a:=random(10);
n:=0;
textcolor(0);
repeat
gotoxy(23,9);
введите число.');
gotoxy(23,10);
readln(i);
if (i <> a) then
begin
n:=n+1;
gotoxy(23,11);
if (i>a) then writeln('Подсказка: Загаданное число меньше.')
else writeln('Подсказка: Загаданное число больше.')
end;
until ((i=a) or (n=2));

gotoxy(23,13);
textcolor(2);
if (i=a) then writeln('Поздравляю! Вы выйграли!')
Else writeln('К сожалению,н

о вы проиграли!');

end.

4,8(62 оценок)
Открыть все ответы
Ответ:
Zertel
Zertel
16.01.2023

ответ: Приветствую, если компьютер был приобретён совсем не давно посмотреть есть ли на нем пломбы. Если пломбы имеются, обратитесь к вашему Системному администратору, или в магазин где вы приобретали компьютер. В случае если пломб нет переключить ваш провод HDMI\DVI\VGA в слот с материнки.

Если картинка появилась, радуемся. Не получилась:

открываете боковую панель компьютера и наблюдаем ОЗУ (Оперативную память) вытягиваете по плашке ОЗУ, к примеру:

Вытянули одну, включаете - картинка должна появится, если не появилась вставляете плашку которую вытянули обратно и вытягиваете другую. Если картинка и в этом случае не появилась ,тогда проблема скорее всего в вашем мониторе.

AHTUNG!

Все действия выполняйте при выключенном компьютере.

Объяснение:


Что делать?? компьютер включается, но экран чёрный и клава с мышкой не работают.
4,5(60 оценок)
Ответ:
Tractorust
Tractorust
16.01.2023

1) 2304 КБайт

2) 5625 КБайт, видеокарта на 64 МБайт

3) 112,5 МБайт

Объяснение:

Задача 1:

16 777 216 = 2^i,   i = 24

I = 1024 * 768 * 24 = 2^10 * 3 * 2^8 * 24 битов =

= 72 * 2^18 битов  = 72 * 2^15 байтов = 72 * 2^5 Кбайт = 72*32 КБайт =

= 2304 КБайт

Задача 2:

16 777 216 = 2^i,   i = 24

I = 1600 * 1200 * 24 = 100 * 2^4 * 75 * 2^4 * 24 битов =

= 25 * 2^2 * 2^4 * 75 * 2^4 * 3 * 2^3 битов = 25*75*3* 2^13 битов  = 5625* 2^10 байтов = 5625* 2^0 Кбайт = 5625 КБайт ≈ 5,5 МБ

Подойдет видеокарта на 64 Мбайт.

Задача 3:

75 Гц, значит в одной секунде 75 кадров.

Объем данных, передаваемых в секунду от видеопамяти к монитору:

75 * 16 * 1024 * 768 = 75 * 2^4 * 2^10 * 3 * 2^8 = 225 * 2^22 битов =

= 225 * 2^19 байт = 225 * 2^9 КБайт = 112,5 * 2^10 КБайт = 112,5 * 2^0 МБайт = 112,5 МБайт

4,4(35 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ