IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> Задачки по логическому оператору
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Женский

Репутация: -  0  +


Помогите решить хоть какую-нибудь задачку!

1. Вычислить значение F(x):
Х в квадрате, если Х кратно 3
F(x)= Х, если Х при делении на 3 дает остаток 1
Х/3,в остальных случаях

2.Найти произведение двух наибольших из трех введенных с клавиатуры чисел.

3. Вычислить: К=МАХ(а+в,в*с,в в квадрате)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Бывалый
***

Группа: Пользователи
Сообщений: 212
Пол: Мужской

Репутация: -  0  +


НУ а так что конкретно не получается? Ты что нито сделал уже?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Женский

Репутация: -  0  +


У меня этих задачек 7 штук. Со всеми разом разобраться не могу и у меня маленький ребенок, времени не хватает
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Бывалый
***

Группа: Пользователи
Сообщений: 212
Пол: Мужской

Репутация: -  0  +


Я конечно извиняюсь, но то что у Вас маленький ребенок к делу никакого отношения не имеет, этим вы намекаете что у вас времени нет на то что бы занятся задачами, а счего вы взяли что у других оно есть give_rose.gif Вы хоть какой-нито код накидали?

НЕ знаю какое x по заданию вводится я подразумевал что целое число, так как под вещественное надо переписывать код) (К первому заданию)
uses crt;
var
x:integer;
f:real;
begin
clrscr;
write('Введите x:');
readln(x);
case (x mod 3) of
0:f:=sqr(x);
1:f:=x;
else f:=x/3;
end;
writeln('f(x)= ',f:2:2);
readkey;

end.




Сообщение отредактировано: Account -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Женский

Репутация: -  0  +


Цитата(Account @ 4.01.2009 22:54) *

Я конечно извиняюсь, но то что у Вас маленький ребенок к делу никакого отношения не имеет, этим вы намекаете что у вас времени нет на то что бы занятся задачами, а счего вы взяли что у других оно есть give_rose.gif Вы хоть какой-нито код накидали?

НЕ знаю какое x по заданию вводится я подразумевал что целое число, так как под вещественное надо переписывать код) (К первому заданию)
uses crt;
var
x:integer;
f:real;
begin
clrscr;
write('Введите x:');
readln(x);
case (x mod 3) of
0:f:=sqr(x);
1:f:=x;
else f:=x/3;
end;
writeln('f(x)= ',f:2:2);
readkey;

end.


Большое спасибо вам!!! Вы добрый человек.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Бывалый
***

Группа: Пользователи
Сообщений: 212
Пол: Мужской

Репутация: -  0  +


Вот вторая задача
uses crt;
var
a,b,c,p:integer;
begin
clrscr;
write('Введите три числа через пробел:');
readln(a,b,c);
if (a>b) or (a>c) then begin if b>c then p:=a*b else p:=a*c end
else p:=b*c;
writeln('Proisvedenie = ',p);
readkey;
end.


Вот третье задание
uses crt;
var
a,b,c,k:integer;
begin
clrscr;
write('Введите a,b,c через пробел:');
readln(a,b,c);
if ((a+b)>(b*c)) and ((a+b)>sqr(b)) then k:=a+b else
if (b*c)>sqr(b) then k:=b*c else k:=sqr(b);
writeln('k = ',k);
readkey;
end.


Сообщение отредактировано: Account -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


Уникум
*******

Группа: Пользователи
Сообщений: 6 823
Пол: Мужской
Реальное имя: Лопáрь (Андрей)

Репутация: -  159  +


ЛеММА 16, все люди добрые, но те, кто пытается выехать за чужой счет - те не очень.. Я подписываюсь под словами Account'а:
Цитата(Account @ 4.01.2009 22:54) *
то что у Вас маленький ребенок к делу никакого отношения не имеет, этим вы намекаете что у вас времени нет на то что бы занятся задачами, а счего вы взяли что у других оно есть
- и очень рекомендую тебе хотя бы начать вникать в предмет. Если нет времени на это - займись чем-нибудь другим mad.gif . Здесь форум людей, интересующихся программрованием, а не тех, кому надо свалить курсовик. Если хочешь просто решения - ради Бога, есть раздел Задачи на заказ - договаривайся о цене, и готово.

Далее:
М
дублированные темы в дальнейшем буду сразу удалять - обе!!






--------------------
я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 22:57
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name