1 Ананас вести как 2 яблока
program z1;
uses GraphABC;
var t:integer;
begin
SetWindowSize(400,400);
write('Введите показания температуры: ');
read(t);
SetPenWidth(3);
if t<=0 then
begin
SetPenColor(clBlue);
Line (150,200,200,150);
Line (200,150,250,200);
Line (250,200,200,250);
Line (200,250,150,200);
FloodFill(200,200,clSkyBlue);
Line (100,200,300,200);
Line (200,100,200,300);
Line (100,100,300,300);
Line (100,300,300,100)
end
else
begin
SetPenColor(clYellow);
Line (100,200,300,200);
Line (200,100,200,300);
Line (100,100,300,300);
Line (100,300,300,100);
SetBrushColor(clYellow);
Circle(200,200,50)
end
end.
Объяснение:
Вводим температуру
Если t <= 0 рисуем снежинку, иначе (если t > 0) рисуем солнышко
мультимедиа - это информационная технология, с которой информация представлена в различных ее видах. Например, звук, текст, видео, графика и т.д. Мультимедийные продукты применяются во всех областях и сферах деятельности человека: медицина, образование, техника, промышленность и т.д. К особенностям мультимедийных продуктов можно отнести следующие:
объединять в себе все виды информации (текстовой, аудио-, видеоинформации, анимации);удобный интерфейс (понятный, доступный, логичный и простой);возможность работать в разных режимах времени (реальное время, замедленный темп, ускоренный темп);быстрый поиск информации;большие возможности навигации;наличие диалогового окна для работы.
т.к. с одной стороны 8яблок и 1ананас а с другой 3 ананаса,то получается что ананасы сокращаются,остаётся 8яб. :2ан.=4яблока за один ананас