НРКмания

Форум любителей сериала "Не родись красивой" и не только
Текущее время: 28 мар 2024, 18:46

Часовой пояс: UTC + 4 часа




Начать новую тему Ответить на тему  [ Сообщений: 6 ] 
Автор Сообщение
 Заголовок сообщения: Очень-преочень срочно!!!
СообщениеДобавлено: 25 сен 2008, 21:48 
Не в сети
Аватара пользователя

Зарегистрирован: 23 окт 2007, 21:00
Сообщения: 238
Откуда: Питер
У меня беда с программированием =( Это я о паскале((( Если кто-нибудь отважитсяпомочь - буду счастлива.


Задачка: дан одномерный массив. Выкинуть все элементы, кратные 5.

_________________
Как объяснить ребенку, что в его комнате нет монстров, кроме него самого.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: 27 сен 2008, 00:28 
Не в сети
Дашка-Милашка
Аватара пользователя

Зарегистрирован: 26 окт 2007, 17:13
Сообщения: 963
Откуда: Тула
Извини, я просто только час назад твой пост увидела... Но если еще надо, то вот код:
Код:
 uses crt;
 var n:array [1..100] of integer;
 k,k1,i,l,m:integer;
 begin
 clrscr;
 write('Введите число элементов в массиве: ');
 readln (l);
 k:=1;
 i:=1;
 repeat
 write(k,' = ');     
 readln (n[i]);
 k:=k+1;
 m:=0;
 i:=i+1;
 until i>l;
 k:=1;
 repeat
 if (n[k] mod 5)=0 then 
begin
 k1:=k;
 repeat
 n[k1]:=n[k1+1];
 k1:=k1+1;
 until n[k1+1]=0;
 m:=m+1;
end
else k:=k+1;
 until n[k]=0;
 for i:=1 to l-m do
 write(n[i],', ');
 readln;
 end.

Что-то я тут намудрила, но вроде работает;)

_________________
Женщина - беззащитное существо, от которого невозможно спастись.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: 28 сен 2008, 09:24 
Не в сети
Шопоголик 2 степени
Аватара пользователя

Зарегистрирован: 21 окт 2007, 09:27
Сообщения: 11153
Откуда: Золотое кольцо
Господи ты Боже мой :shock:. Девочки, вы реально онимаете, что тут написано? :swoon:

_________________
Изображение
- Расскажите о себе в двух словах.
- Всякое бывало
:girl_sigh:


Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: 28 сен 2008, 10:40 
Не в сети
счастливая

Зарегистрирован: 24 ноя 2007, 15:17
Сообщения: 1155
Я нет. :grin:

_________________
ПОЖАЛУЙСТА, УДАЛИТЕ ПРОФИЛЬ!


Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: 28 сен 2008, 14:41 
Не в сети
Дашка-Милашка
Аватара пользователя

Зарегистрирован: 26 окт 2007, 17:13
Сообщения: 963
Откуда: Тула
Я-любимая писал(а):
Господи ты Боже мой :shock:. Девочки, вы реально понимаете, что тут написано? :swoon:

Лично мне все понятно;) Хотя в возрасте Флэшки я подобные задачи тоже не умела решать, даже переживала из-за этого очень сильно. Но потом само пришло. И к ней придет ;)

_________________
Женщина - беззащитное существо, от которого невозможно спастись.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: 20 окт 2008, 14:02 
Не в сети
Аватара пользователя

Зарегистрирован: 23 окт 2007, 21:00
Сообщения: 238
Откуда: Питер
Спасибо большое Касси! Но мне почему-то кажется, что ко мне это точно не придёт)))

_________________
Как объяснить ребенку, что в его комнате нет монстров, кроме него самого.


Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 6 ] 

Часовой пояс: UTC + 4 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 0


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения

Найти:
Перейти:  
Powered by Forumenko © 2006–2014
Русская поддержка phpBB