Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Новички в программировании > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 12.12.2017, 06:59   #1
Anastasiya326
Новичок
 
Регистрация: 12.12.2017
Сообщений: 4
Репутация: 10
По умолчанию написать программу на Паскаль

Дан целочисленный массив размера N. Вывести вначале все его четные элементы, а затем - нечетные.
Anastasiya326 вне форума   Ответить с цитированием
Старый 17.12.2017, 09:25   #2
newerow1989
Я самый любопытный
Профессионал
 
Аватар для newerow1989
 
Регистрация: 24.07.2012
Адрес: RU, Алтайский край, Красногорский р-н, с. Балыкса, ул. Центральная Сообщений: 7,541 Репутация: 37104
Сообщений: 1,668
Репутация: 1476

skype: newerow1989
По умолчанию

Код:

var p:array[1..10] of integer;
    i,j,n,z:integer;
begin
   Randomize;
   For i:=1 to 10 do
   begin
      p[i]:=Random(21);
      Write(p[i]:3,'  ');
   end;
   Writeln;
   Writeln;
   n:=0;
   For i:=1 to 10 do
      If p[i] mod 2=0 then
      begin
         n:=n+1;
         z:=p[i];
         For j:=i downto n+1 do
            p[j]:=p[j-1];
         p[n]:=z;
      end;
   For i:=1 to 10 do
      Write(p[i]:3,'  ');
   Writeln;
   Readln;
end.


Скопировано от сюда: http://programmersforum.ru/showthread.php?t=315594
__________________
С запрограммированным приветом, Неверов Евгений!
Сайт: http://newerow1989.narod.ru
[Паскаль] [Delphi]
newerow1989 вне форума   Ответить с цитированием
Ответ

Опции темы

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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

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

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
написать программу в паскаль Kate3110 Помощь студентам 6 20.05.2014 11:58
Написать программу для Паскаль 9 класс: составить программу которая печатает таблицу умножения и сложения натуральных чисел goodula Помощь студентам 0 23.01.2014 17:39
написать программу. паскаль cherry097 Помощь студентам 2 30.11.2010 01:14


04:09.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru