HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Перезагрузить страницу Помогите в Паскале
   
 
 
Опции темы Поиск в этой теме Опции просмотра
Предыдущая Предыдущее сообщение   Следующее сообщение Следующая

Помогите в Паскале
  #1  
Старый 06.09.2007, 19:14
Rast1k
Banned
Регистрация: 09.08.2007
Сообщений: 56
С нами: 9871526

Репутация: -63
По умолчанию Помогите в Паскале
Итак у меня началась школа))

вот сегодня была информатика нам дали ДЗ сделать кое что...

Я представлю вам код паскаля...

Тема: Движение по кривой

Суть в том, что смайлик бегает по синусоиде и вырисовывает надпись antichat.

Посколько дома нету возможности проверить код проверьте плиз правильность.

Код:
program antichat;
uses crt;
var i,x,y: integer;
           a: real;
begin
textbackground(9);
clrscr;
for i:= 1 to 360 do
begin
a:= i*pi/180;
x:=round(i/4.5);
y:=round(25+24*sin(a));
gotoxy(x,y);
write('=)');
delay(1500);
gotoxy(x,y);
write('antichat');
end;
end.
кстати если можете выложите код с одной переменной, а то что-то не доходит)
𝕏 Twitter Reddit Telegram Копировать ссылку
Последний раз редактировалось Rast1k; 06.09.2007 в 19:31..
 
Ответить с цитированием
 



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
кто играет в www.ganjawars.ru ??? помогите kuppher Болталка 12 26.07.2008 23:38
ПомогитЕ !!! подалуста найти кряк гейлордфакерЪ Болталка 2 30.08.2007 14:48
ПоМоГиТе! ПЛЗ!!! farik.aka Уязвимости Mail-сервис 1 17.09.2006 13:00



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.