помогите решить две задачки (pascal)
помогите решить две задачки (pascal)
#680532
наверх
Автор: Vrt
Дата: 26 мая 2005 18:30
субж :-)
вознаграждение гарантируется.
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#680537
наверх
Автор: 004.
Дата: 26 мая 2005 18:31
Обойти шахматную доску конем? )))
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#680542
наверх
Автор: Vrt
Дата: 26 мая 2005 18:34
не, не из этой области)
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#680591
наверх
Автор: Vrt
Дата: 26 мая 2005 19:11
up :-(
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#680772
наверх
Автор: LAlex_Баянист :-)
Дата: 26 мая 2005 22:29
Цитата: От пользователя: Vrt
помогите решить две задачки (pascal)
Озвучь задачки-та... ;-)
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#680787
наверх
Автор: Danilka (О пользователе)
Дата: 26 мая 2005 22:43
Да, озвучь!
У меня в обоих вузах пятёрки по Паскалю были :-)
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681010
наверх
Автор: Vrt
Дата: 27 мая 2005 03:03
Задача 1.
Даны 2 квадратные матрицы, порядок которых не превосходит 10. Уменьшить в 2 раза элементы той из них, у которой наибольший след (сумма диагональных элементов), считая что такая матрица одна. напечатать исходные и полученную матрицы. Вычисление следа оформить в виде процедуры.
задача 2.
Найти 100 первых простых чисел.
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681078
наверх
Автор: PSH (О пользователе)
Дата: 27 мая 2005 09:18
Эххх
Даже писать лень
Тут даж думать не надо, тупая работа машинистки - сиди и набивай
Думал, чонить интересное...
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681085
наверх
Автор: Duke_Log (О пользователе)
Дата: 27 мая 2005 09:22
Цитата: От пользователя: Vrt
задача 2.
Найти 100 первых простых чисел.
Можно написать тупым методом - просто проверять числа на простоту, а можно замутить решето Эратосфена - будет наамного шустрей - хотя для 100 чисел это не концептуально
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681300
наверх
Автор: masterO99
Дата: 27 мая 2005 10:26
паскаль тут при чем?
может тебе алгоритм нужен?
или сразу готовый ответ на паскале?
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681385
наверх
Автор: PSH (О пользователе)
Дата: 27 мая 2005 10:45
Цитата: От пользователя: master099
паскаль тут при чем?
может тебе алгоритм нужен?
или сразу готовый ответ на паскале?
Да полюбому это домашнее задание по информатике для 2-го курса института. Их всегда в паскале требуют и задачи типовые. Я в свое
время их тысячами решал и в пиве купался :-d :-d :-d .
Поэтому чюваку явно нужен готовый ответ, со всеми uses и прочей лабудой TP 7.0, чтоб вставил, нажал Compile и алилуйя :-)
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681392
наверх
Автор: masterO99
Дата: 27 мая 2005 10:46
имхо это неправильно...
пошол учицца - учись.
ладно б спросил про историю КПСС...
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681516
наверх
Автор: PSH (О пользователе)
Дата: 27 мая 2005 11:18
Цитата: От пользователя: master099
пошол учицца - учись
Так та хз.
Я в свое время половине потока МТ-УПИ их решал. Металлурги эту информатику сдали и никогда больше не вспомнили, а мне хорошо :-) . Издержки университетского образования :-)
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681520
наверх
Автор: Тузя (О пользователе)
Дата: 27 мая 2005 11:20
Помогите зашифровать пару слов в RSA :-)
по дискретнйо математике нада)))
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681588
наверх
Автор: John Dow
Дата: 27 мая 2005 11:57
первая
procedure Rachet(Mas)
For i = 1 to 10
begin
Sled1:=Sled1+Mas(i,i):
end:
end;
procedure begin
Sled1=Rachet(Mas1);
Sled2=Rachet(Mas2);
// i takaya drebeden ebet mozgi celyy den
if Sled2>Sled1 then
Masitog=Mas2;
else
MasItog=Mas1;
For i=1 to 10
begin
For j=1 to 10
begin
Temp:= MasItog(i,j)/2;
MasItog:=Temp
end:
end:
выводи на печать....
только переменные определи
и массивы..
а для простого числа ..ну что дерзайте :-)
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#681594
наверх
Автор: PSH (О пользователе)
Дата: 27 мая 2005 11:59
Не буйт компилиться
Особенно конструкция
Цитата: От пользователя: John Dow
procedure begin
улыбнула :-)
0 /0 |
| Поделиться:
Re: помогите решить две задачки (pascal)
#15411003
наверх
Автор: Е 1.RU (О пользователе)
Дата: 4 августа 2015 11:38
Тема автоматически закрыта.
0 /0 |
| Поделиться:
Обсуждение этой темы закрыто модератором форума