|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
16.04.2010, 20:38 | #1 |
Пользователь
Регистрация: 16.04.2010
Сообщений: 48
|
нахождения наименьшего общего кратного 4 заданных чисел, используя процедуру
Помогите, пожалуйста! Очень-очень срочно!
Напишите программу нахождения наименьшего общего кратного 4 заданных чисел, используя процедуру! я уже не знаю, что делать. хоть вешайся иди! ну, кто-нибудь! помогите, пожалуйста!!!! Последний раз редактировалось wrmarw; 16.04.2010 в 20:42. |
16.04.2010, 20:56 | #3 |
Пользователь
Регистрация: 16.04.2010
Сообщений: 48
|
идеи у меня вот какие (точно неверно!!!):
program a; uses crt; var a, b, c, d, rez: integer; procedure nok (k, t: integer; var z: integer); begin if k>t then z:=k else z:=t; while not ((z mod k=0) and (z mod t=0) do z:=z+1; nok:=z; end; begin clrscr; writeln ('напишите 4 числа'); readln (a, b, c, d); nok(nok(nok(nok(a, b), c), d); writeln ('результат', rez); readkey; end. |
16.04.2010, 20:57 | #4 |
Пользователь
Регистрация: 16.04.2010
Сообщений: 48
|
исправьте, плиз-з-з-з-з-з!!! точно вкдь неправильно всё!!!
|
16.04.2010, 21:09 | #5 |
Пользователь
Регистрация: 16.04.2010
Сообщений: 48
|
а-у-у-у-у, ну где вы все?
|
16.04.2010, 21:22 | #6 |
Старожил
Регистрация: 26.04.2008
Сообщений: 2,645
|
Поиск по форуму дал бы ответ уже давно.
Код:
|
18.04.2010, 16:48 | #7 |
Пользователь
Регистрация: 16.04.2010
Сообщений: 48
|
ну и где здесь процедура?????????????? или я уже тю-тю совсем????
|
18.04.2010, 16:49 | #8 |
Пользователь
Регистрация: 16.04.2010
Сообщений: 48
|
ну и где здесь процедура?????????????? или я уже тю-тю совсем????
|
18.04.2010, 17:23 | #9 |
Старожил
Регистрация: 26.04.2008
Сообщений: 2,645
|
Функция - частный случай процедуры. Если нужно именно procedure, то включи мыслю и поменяй result функции на параметр-переменную для procedure.
|
18.04.2010, 17:29 | #10 |
Пользователь
Регистрация: 16.04.2010
Сообщений: 48
|
вот именно! как оно меняется, я не знать!!!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
функция,которая выполняет сложение двух чисел,заданных в виде строк | 6kakain9 | Помощь студентам | 3 | 10.02.2010 17:55 |
Определить процедуру нахождения количества слов | qwertytol | Помощь студентам | 2 | 08.12.2009 22:29 |
Определить из наибольший общий делитель, используя функцию нахождения общего делителя. | Igomax | Помощь студентам | 6 | 23.05.2009 19:41 |
нахождение наибольшего общего делителя и наименьшего общего кратного | made in russia | Помощь студентам | 2 | 21.12.2008 23:36 |
вычисление суммы чисел, кратных 3 из последовательности, состоящей из 10 чисел, заранее заданных | Белка | Помощь студентам | 3 | 27.10.2007 11:53 |