Бирюков Карпова1379
?>

Какое свойство указывает на назначение объекта может быть красным может обрабатывать информацию может быть колючим может быть теплым

Информатика

Ответы

sashakrav

Скорее всего тёплый, т.к. красный цвет исходит из сильно нагретых вещей (напр. солнце)

ravshandzon3019835681

Объяснение:

На чистом паскале никак. Либо используя графические библиотеки (например, GraphABC в Pascal ABC.NET), либо, например Delphi.

GraphABC:

uses GrathABC;

var b: picture;

begin

b:= Picture.Create('1.png');

...

end.

Далее через процедуру OnKeyDown или OnKeyPress считываем ключ с клавиатуры, и если это 2, то показываем изображение.

Примерно это должно выглядеть так:

procedure OnKeyPress(key: integer);

begin

if key = 2 then b.Draw(10, 10);

end;

Delphi: на нём гораздо проще. Здесь есть уже готовая форма, и стандартные компоненты за визуальность).

Через компонент TImage (вкладка Additional) загружаем изображение, устанавливаем у изображения свойство Visible:= false. Далее через OnKeyPress главной формы считываем ключ, и если key = 2, то Image.Visible:= true;

far-yuliya128

//PascalABC.NET версия 3.4.0.1677 от 17.06.18

//Если программа не запускается, то обновите версию


begin

   var zarazheno := 1;

   var sum := zarazheno;

   for var i := 1 to 4 do

   begin

       zarazheno *= 10;

       sum += zarazheno;

       WritelnFormat('{2} Новозараженно = {0}, всего заражено = {1}', zarazheno, sum, i);

   end;

end.


Вывод

1 Новозараженно = 10, всего заражено = 11

2 Новозараженно = 100, всего заражено = 111

3 Новозараженно = 1000, всего заражено = 1111

4 Новозараженно = 10000, всего заражено = 11111

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Какое свойство указывает на назначение объекта может быть красным может обрабатывать информацию может быть колючим может быть теплым
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

iracaenko153
Tatyana Anton1475
myataplatinumb348
e-s-i-k
mistersoshnev354
Larax0819
elenakarpova709
lider123
Вадим
ignashkinamasha
Galina-Marat1096
АЛЕКСЕЙ
oshemkov579
koptevan6