Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
Александримя
2 / 2 / 2
Регистрация: 18.11.2012
Сообщений: 152
1

Движение машины справа налево вдоль прямой

12.03.2013, 21:37. Просмотров 1299. Ответов 1
Метки нет (Все метки)

Движение машины справа налево вдоль прямой.

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.03.2013, 21:37
Ответы с готовыми решениями:

Движение машины (грузовика) справа налево, на заднем плане — солнце
Очень прошу помочь.. Нам задали написать программу для движения машины...

Найти число, полученное при прочтении числа N справа налево
Дано целое число. Используя операции деления нацело и взятия остатка от...

Определить, является ли последовательность цифр числа возрастающей справа налево
Подскажите, пожалуйста, в чём ошибка. Нужно определить, является ли...

Составить программу, которая читает заданное слово справа налево.
Составить программу, которая читает заданное слово справа налево. С помошью...

Напечатать число, получаемое при прочтении его цифр справа налево
Дано натуральное число. а) Напечатать число, получаемое при прочтении его цифр...

1
Puporev
Модератор
55407 / 42540 / 29393
Регистрация: 18.05.2008
Сообщений: 100,630
13.03.2013, 09:56 2
Лучший ответ Сообщение было отмечено Александримя как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
uses graphABC;
procedure auto(x,y:integer);
begin
setpencolor(clBlack);
setpenwidth(3);
setbrushcolor(clWhite);
rectangle(x,y,x-80,y+40);
rectangle(x-80,y+10,x-105,y+40);
circle(x-20,y+40,10);
circle(x-93,y+40,10);
end;
var x,y:integer;
begin
x:=windowwidth;
y:=windowheight div 2-40;
lockdrawing;
repeat
clearwindow;
setbrushcolor(clBlue);
setpencolor(clBlue);
rectangle(0,0,windowwidth,windowheight div 3);
setbrushcolor(clGreen);
setpencolor(clGreen);
rectangle(0,windowheight div 3,windowwidth,windowheight);
setbrushcolor(clBlack);
setpencolor(clBlack);
rectangle(0,windowheight div 2-30,windowwidth,windowheight div 2+30);
x:=x-2;
auto(x,y);
sleep(50);
redraw;
until x<0;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.03.2013, 09:56

Найти число, образованное при прочтении его цифр справа налево
Найти число, образованное при прочтении его цифр справа налево.

Является ли число одинаково читающимся как справа налево, так и наоборот?
Установить, является ли заданное натуральное число n палиндромом (одинаково...

Найти число полученное при прочтении его цифр справа налево
1. Дано трехзначное число. Найти число полученное при прочтении его цифр справа...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru