Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум KAZANHOME _ Все о программировании _ Pascal ABC

Автор: $RamireZ$ 17.12.2007, 19:30

Сам учусь в технаре и иногда приходится составлять задачи на этом языке.
Выкладывайте задачи ,может чем помогу.

Автор: $RamireZ$ 28.1.2008, 22:42

Тему можно закрыть,всеравно никто не пишет

Автор: sergei 10.2.2008, 2:23

И не удивительно. Я вобще не понимаю зачем этот форум, когда есть специализированные форумы, где где сидят монстры программирования и порвут любую задачу в тряпки в 2 минуты и ещё поспорят между собой чьё решение лучше . Сюда мало кто пойдёт за помощью при всей активности этого раздела.

Автор: $RamireZ$ 11.2.2008, 23:48

Цитата(sergei @ 10.2.2008, 2:23)

. Сюда мало кто пойдёт за помощью при всей активности этого раздела.

Согласен с тобой

Автор: $RamireZ$ 15.3.2008, 19:08

Срочно нужна элементарнейшая прога на ПаскалеАВС с помощью модуля GraphABC посвященная Дню Победы;
Необходимо чтобы обязательно были не менее 2-х движущихся предметов;
Что то типо этого,только по теме Дня Победы[attachmentid=12268]

Автор: Inhuman 15.3.2008, 20:41

Цитата($RamireZ$ @ 15.3.2008, 19:08)

Жесть!

Автор: Asterix 19.3.2008, 23:13

Решите пожалуйста такие задачи:

1. Дана двумерная матрица m на m. Поменять местами минимальный и максимальный элементы главной диагонали. Выполнить двумя способами:
а) Ввод данных из файла и вывод результатаов в файл.
б) Ввод с клавиатуры.

2. Даны две строки. В первой заменить "+" на "-", а во второй "?" на "!". Выполнить двумя способами:
а) Без подпрограммы.
б) С подпрограммой.

3. Дан текст, слова разделены одним пробелом. Поменять местами первое и последнее слова текста.

4. Даны два двумерных массива ( m на m, l на l). Для каждого массива найти сумму элементов, стоящих над главной диагональю. Выполнить двумя способами:
а) Без подпрограммы.
б) С подпрограммой (с функцией).

Если решите хотябы пару задач, буду очень благодарен.

Автор: $RamireZ$ 20.3.2008, 17:51

Вот набросал тут быстренько пока время было;вот глянь что получилось :
вот тут под (а)

Цитата(Asterix @ 19.3.2008, 23:13)

2. Даны две строки. В первой заменить "+" на "-", а во второй "?" на "!". Выполнить двумя способами:
а) Без подпрограммы.
б) С подпрограммой.

Код

program Two;
var
c1,c2:string;
k,i,x:integer;
begin
writeln('Введите 1 строку');
readln(c1);
writeln('Введите 2 строку');
readln(c2);
for k:=1 to length(c1) do
begin
if c1[k]='+' then
c1[k]:='-'
end;
begin
for i:=1 to length(c2) do
if c2[i]='?' then
c2[i]:='!'
end;
writeln('измененный вид 1 строки:',c1);
writeln('измененный вид 2 строки:',c2);
end.

вот под(б);не гарантирую что именно так должна выглядеть

Код

program Twwo;
var
c1,c2:string;
k,i,x:integer;
procedure ram;
begin
for k:=1 to length(c1) do
begin
if c1[k]='+' then
c1[k]:='-'
end;
begin
for i:=1 to length(c2) do
if c2[i]='?' then
c2[i]:='!'
end;
end;
begin
writeln('Введите 1 строку');
readln(c1);
writeln('Введите 2 строку');
readln(c2);
ram;
writeln('измененный вид 1 строки:',c1);
writeln('измененный вид 2 строки:',c2);
end.

остальные потом попробую сделать(пока времени нет)

Автор: Asterix 26.3.2008, 16:01

Спасибо. Первая решена правильно, а во вторая нет. Там подпрограмма нужна.

Автор: Asterix 1.4.2008, 20:26

Мои задачи кто-нибудь решите, пожалуйста.

Автор: $RamireZ$ 17.4.2008, 22:13

все теперь программирую в Delphi7

Автор: HL4065 18.5.2008, 7:07

я тоже хочу научится проги писать на паскале. может ктонидь ссылку даст и учебник какой нибудь нормальный скинет?

Автор: LLIyT 19.5.2008, 17:46

на ум пока только форум винграда пришел http://www.forum.vingrad.ru/ ... а вообще, гуглить полезно;)

Автор: RamireZ 15.6.2008, 18:32

Надеюсь что кто-нить мне поможет,от этой задачи по биномиальному распределению зависит моё будущее
Составить программу моделирования случайной величины с биномиальным законом распределения.Считать в качестве данных кол-во чисел и параметры закона распределения.По результатам моделирования построить полигон частот для ДСВ или гистограмму для НСВ.
О4ень надо до пятницы

Автор: Morlok 20.7.2008, 11:17

Вот чудо такое...мы в школе информатику изучали на уровне, word, exel, а при поступлении в ВУЗ - информатика PAscal, разве ето справедливо :( мы конешна учили basic (БЛИН НУ НАФИГА!?) по целых пол-оператора за урок, как раз уложились в два года. Конечно на нем можно сделать тетрис в дос и то с гораздо большим трудом, чем на любом современном языке. И ладно бы мы его "профессионально" (насколько это возможно) проходили, но блин нет, мы писали "программы" (как можно назвать программой 5 строчек) который вычисляют ...да ниче они не вычисляют... тупость всякую делали. ЭКЗАМеН - ВНИМАНИЕ - НАРИСОВАТЬ ИМЯ СВОЕ на экране, потом рисунок с 8-11 линиями максимум, ну на "5" пару дуг и окружностей...я упал...за 10 минут нарисовал, все удивились, потом пришел умник один, под конец урока, че та нажал буквально за секунду, как я отвернулся, вылез синий экран, который я показал учителю, пол класса подтвердила, чт оу меня там "БЫЛО" всё и мне четыре (хотя впринципе нормально, тк я не ходил на уроки толком - просто слушать одну пару, про ОДИН оператор мну не прельщало...ваще гадство а теперь в ВУЗе после такой школьной подготовки Паскаль...бррр... Ладно бы просто, но он блин на вступительных экзаменах же!

Автор: RamireZ 12.9.2008, 16:32

Как можно вывести функцию arcsin и arccos?

Автор: S.T.A.L.K.E.R 13.11.2008, 13:55

как это решать ?

Автор: Кадeт 30.6.2009, 19:22

Цитата($RamireZ$ @ 17.12.2007, 20:39)

В каком техникуме учишься?

Автор: RamireZ 1.7.2009, 22:25

Цитата(Кадeт @ 30.6.2009, 20:31)

В каком техникуме учишься?

КЭТС

Автор: Daydara 4.6.2010, 13:20

помогите с задачей пожалуйста:
Заданный массив целых чисел делится на 3 части двумя элементами:максимальным и минимальным. Определить сумму элементов в каждой части массива. Используйте функции для нахождения индексов максимального и минимального элементов и подсчёта суммы элементов в указанной части массива.

Автор: karasi 4.6.2010, 14:35

Цитата

помогите с задачей пожалуйста:Заданный массив целых чисел делится на 3 части двумя элементами:максимальным и минимальным. Определить сумму элементов в каждой части массива. Используйте функции для нахождения индексов максимального и минимального элементов и подсчёта суммы элементов в указанной части массива.

А в чем проблема?

Автор: Daydara 4.6.2010, 15:51

Ещё вот задачи:
2) В файл Telpone записать номера телефонов сотруднико учреждения указать фамилии , инициалы, должность ,
стаж работы и номер телефона . Получить: номер телефона сотрудника по его фамилии и инициаллам ,
по номеру получить фамилию и инициалы,список телефонов всех сотрудников ,работающих в указанной должности,
список сотрудников ,чей стаж работы превышает указанное количество лет.
3)1.Нарисовать рисунок на своё усмотрение .2. В рпавильном четырёхугольной пирамиде провести сечение ,проходяшеечерез диагональ основания и середину бокового ребра. Построить график функции F(x)sin в квадрате x .
Заранее благодарен.
Мой почтовый ящик [email protected]

Решите пожалуйста.

Автор: CoalAbsobeWAl 7.11.2010, 15:49

Ну, я знаю как можно сделать так, чтобы в самом тексте не выводились кракозябры, но это надо чуть-чуть править реестр.
А, вот, можно ли сделать это как-нибудь без реестра кто-нибудь знает?

Автор: shoosybinna 4.12.2010, 7:55

оладий его разбери примеры которые установились вместе с Pascal в которых используеться оператор Write итд неработают. Может это быть глюком pascal или надо копатся в настройках. Если дело в настройках то где и что надо менять?

Русская версия Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)