кто поможет составить программу в PoscalABC?? - voprosy.by - вопросы и ответы Беларуси

кто поможет составить программу в PoscalABC??

Решенный 2 ответы 0 Просмотров Размещен в Программирование
Поделитесь с помощью любой кнопки:
1
Помагите составить программу обшарил весь гугл...и нечего=((

Короче надо чтобы прога выводила 2-3 изображения на экран....у меня получается только одно=((

-----------------------------------------------------------------------

program xxx;
uses crt, GraphABC;
var ris: integer; fris:string;
begin
SetWindowSize (1000,500);
fris:='название изображения';

ris:=loadPicture (fris);

DrawPicture (ris,380,70, 200,320)

end.

---------------------------------------------------------------------

Аналогичным способом 2 картинки вывести не получается=(( Что не так? паскаль пишет "ожидается оператор"

2 ответов

3

Паскаль низнаю вообще!

Вот что получилось методом тыка)

Фото

Code:

program DrawImg;
  uses crt, GraphABC;
  var ris: integer; fris:string;
  begin
   ClearWindow(0xFF000);
   SetWindowSize (430,340);
   //Вывод первого изображения
   fris:='img1.bmp';
    ris:=loadPicture (fris);
     DrawPicture (ris,10,10, 200,320);
   //Вывод второго изображения
   fris:='img2.bmp';
    ris:=loadPicture (fris);
     DrawPicture (ris,220,10, 200,320);
   //И т.д.
end.

0

Спасибо!yesyes Ты очень помог, но всё-таки где могла быть моя ошибка?

Пожалуйста войдите или зарегистрируйтесь для ответа на этот вопрос.

4,293 вопросов

19,435 ответов

9,636 комментарии

18,647 пользователи