Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC


Язык Паскаль АБС. Форум программистов Pascal ABC. Программирование на языке Pascal ABC. Решение задач, программирование и готовые программы на Паскаль АБС.
Войти
Регистрация
Восстановить пароль
Новая тема
Темы раздела : Pascal ABC Искать в этом разделе
Объявление
22.05.2012 mik-a-el (Администратор)
Объявление
Просмотров: 3,145,138 Посмотреть объявление Объявление: Правила форума
22.11.2007 mik-a-el (Администратор)
  Рейтинг Тема / Автор Последнее сообщение Ответов Просмотров
Важные темы
дерево пифагора, ковер серпинского, кривая гильберта, кривая госпера, кривая дракона, кривая коха, множество мандельброта, папоротник, снежинка коха, треугольник серпинского, фрактал Важная тема Важно: Фракталы
ildwine
08.11.2018 19:30
10 37,434
Обычные темы
 
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
     
 
Задать вопрос
Дан массив K(16). Найти номер предпоследнего нулевого элемента, а также сумму и количество...
kisler
10.02.2016 03:56
5 569
Нужно было составить программы: 1) Найти сумму ряда: 1 + 1/2 + 1/3 + 1/4 + 1/5 +... 2) Даны...
Nekit2000
09.02.2016 23:44
1 179
Нарисовать снеговика в паскаль абс.
IvanReverse
09.02.2016 20:55
2 21,003
Прошу ребят помогите пожалуйста!! Заранее спасибо. Составить блог схему алгоритма и программу,...
PMDLA8
09.02.2016 20:46
0 126
Описать, используя структуру данных запись, почтовую сортировку (город, улица, дом, квартира, кому,...
Евгений_Варавко
09.02.2016 18:34
0 167
Помогите пожалуйста нужно решить срочно задачу в паскале уже неделю мучаюсь и немогу... Заменить...
kitty_189
09.02.2016 16:44
1 112
здравствуйте. нужно создать прямоугольник такого вида: ********** *Привет* ********** *Как...
Inkorpus
09.02.2016 14:25
5 836
На пути из города А в город В расположено насколько станций,соединенных между собой железной...
Никита Песков
09.02.2016 11:50
1 235
Написать программу а в ней подпрограмму для вычисления квадрата суммы элементов массива...
кабак
09.02.2016 00:33
1 879
Здравствуйте, дорогие форумчане! У меня появилась такая проблемка: Мне необходимо, например,...
Time_Lord
08.02.2016 21:37
14 1,005
Помогите пожалуйста, уже не знаю как и что исправить, надо написать функцию которая считает сумму...
Nyshk@
08.02.2016 19:08
2 242
За решение заранее спасибо Дорожка замощена плитками в один ряд, плитки пронумерованы числами от 1...
Ww
08.02.2016 19:07
6 1,718
Написать функцию, которая циклически сдвигает одномерный массив вправо или влево на указанное число...
jestero
08.02.2016 18:35
1 248
1935. Слёзы утопленников Ограничение времени: 1.0 секунды Ограничение памяти: 64 МБ Гадалка Тиа...
ITS
08.02.2016 18:16
16 1,013
Написать программу деления длинных чисел (до 100 десятичных знаков).
lkaterinna
08.02.2016 17:59
0 214
var a: array of integer; i,j,nmin,n,c:integer; begin writeln('Введите размер'); ...
jestero
08.02.2016 17:12
2 129
Помогите пожалуйста, долго искал, так и не нашел. P.S. Мне нужно для сохранения прогресса в игре.
FlameAssasin
08.02.2016 13:48
4 831
В тексте,в каждом нечётном слове поменять местами два первых символа ,pascal ,слова разделены...
Евгений_Варавко
08.02.2016 13:36
1 140
В тексте ,в каждом нечётном слове поменять местами два первых символа ,задача в паскаль ,помогите...
Евгений_Варавко
08.02.2016 13:12
1 764
Как сделать проверку веденных данных? К примеру мне надо вводить только цифры, при вводе буквы ,...
Imwey
08.02.2016 11:21
1 338
Преобразовать одномерный массив вещественных чисел Y(N)={1.2,-7.1,2.3,-0.5,6.3,-2.7,4.9,-6.6,-15.1}...
RVCSGO
08.02.2016 11:06
1 811
while X < 0.089 do begin X:= X + 0.01; Y1:= Y(X); Writeln (X:5:2,' ',Y1:0:6); end; ...
jestero
08.02.2016 10:45
1 163
Чтобы while не использовать
jestero
08.02.2016 10:36
2 1,105
В отделе кадров студентов хранится следующая информация о каждом студенте: фамилия, имя, отчество,...
lFoksL
08.02.2016 10:28
0 274
procedure NX (var N: word); begin Writeln (N); N:= N + 1; end; {NX} var L : word; j :...
jestero
08.02.2016 10:24
1 194
function fact(n:byte):integer; var k : longint; j : byte; begin k:= 1; for j:= 2 to n do...
jestero
08.02.2016 10:17
1 197
Дан одномерный целочисленный массив. Найти его максимальный элемент и заменить соседние с ним...
daniL111111
08.02.2016 10:00
1 763
Для n= 1,2,...12 вычислить {A}_{n}=\frac{(2n)!}{n!(n+1)!}. Проверить, является ли {A}_{n} целым...
jestero
08.02.2016 09:53
1 170
Только учу паскаль, запускаю свою программу, мне выдает "Программа завершена, нажмите любую...
FockeR322
08.02.2016 09:12
2 184
var k, l, c, i : word; begin Write (#10,' c = '); Readln (c); Writeln; k:= 2; l:= 2; ...
jestero
07.02.2016 21:09
1 151
Дан двумерный массив из двух строк и пятнадцати столбцов. Найти номера двух соседних столбцов,...
jestero
07.02.2016 20:37
0 194
найти произведение и кол-во элементов массива V,которые расположены между его наименьшим и...
RVCSGO
07.02.2016 20:28
0 167
напишите программу которая получает 2 шестнадцатеричных числа, считает их сумму и выводит ответ в...
MonsterDester
07.02.2016 19:27
1 840
1+2+2^2+...2^(n-1)=2^n - 1 function Stepen2 (k: byte): longint; {два в степени} var Y :...
jestero
07.02.2016 17:16
1 228
Напишите программу, которая суммируют 2 римских числа и выводит на экран ответ в арабских числах и...
MonsterDester
07.02.2016 16:52
0 153
Три торговца должны поделить между собой 21 бочонок из которых 7 бочонков полных кваса, 7 полных на...
jestero
07.02.2016 16:43
4 852
Помогите сделать базу данных. Автозаправка На автозаправке имеются несколько колонок для заправки...
Алекс1546
07.02.2016 16:38
0 182
Заполнить массив из 30 целых чисел с клавиатуры. Найти тройку последовательных элементов, сумма...
daniL111111
07.02.2016 14:29
0 194
Нарисуйте церкву в Паскале как показано на картинке
Hellboy2002
07.02.2016 12:29
0 269
var P : real; X : real; k : longint; begin Writeln ('  Проверка утверждения... '); ...
jestero
07.02.2016 11:46
2 182
function StepenNk (N: word; k: byte): longint; {N**k} var j : byte; St : longint; {ST:= N**k}...
jestero
07.02.2016 10:57
1 127
В заданном тексте в каждом нечетном слове поменять местами первые два буквенных символа и заменить...
Евгений_Варавко
07.02.2016 10:19
4 874
Дана матрица А(n,m), n, m ≤ 20, заполненный случайными числами из интервала . Разработайте...
Kumogawa
07.02.2016 09:11
1 807
uses Crt; label Next; var n : word; k : word; nx : word; q : word; i : word;...
jestero
07.02.2016 09:01
2 162
Дан одномерный массив целых чисел A. Напишите программу, которая перепишет в массив B сначала в...
Imwey
07.02.2016 08:29
6 900
Lj:= Round (Sqrt(N-3)); for i:= 0 to Lj do for j:= 0 to Lj do for k:= 0 to Lj do for l:= 0...
jestero
07.02.2016 08:03
2 226
Была задача: Дано натуральное число n. Требуется подсчитать количество цифр данного числа - 73485....
Nekit2000
07.02.2016 00:54
20 848
Как сделать подменю? Искал, ничего полезного не нашел. К примеру: После выбора Треугольника, не...
Imwey
06.02.2016 21:40
6 848
Итак,есть задание: Преобразовать одномерный массив вещественных чисел...
DummyGirl
06.02.2016 20:48
3 911
var n : word; begin n:= 1; while True do begin Inc(n); if (100 mod n) <> 4 then ...
jestero
06.02.2016 18:53
4 780
 
     
 
Новая тема
Опции раздела Искать в этом разделе
Искать в этом разделе :

Расширенный поиск Темы без ответов

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