|
2 / 2 / 1
Регистрация: 29.10.2008
Сообщений: 57
|
|
| 1 | |
Задача на числа05.11.2008, 17:49. Показов 885. Ответов 4
Метки нет (Все метки)
 Задача: Ввести четыре числа и найти сумму и произведение двух из них, не являющихся ни минимальным, ни максимальным.
0
|
|
(| 05.11.2008, 17:49 | |
|
Ответы с готовыми решениями:
4
Задача:Даны числа N и K, найти разбиение числа N на K слагаемых(без повторений) Задача про простые числа. Выпишите все простые числа, находящиеся в интервале между а и б Задача Числа Задача (числа фибоначчи) |
Сообщение от Puporev
|
Почетный модератор
64299 / 47594 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
|
|
| 05.11.2008, 19:32 | 4 |
|
Я вообще-то отвечал, но на сайте произошел сбой и ответ не ушел. Повторяю.
Код
uses crt;
var a,b,c,d,max,min,s,p:integer;
begin
clrscr;
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
write('d=');readln(d);
min:=a;
if b<min then min:=b;
if c<min then min:=c;
if d<min then min:=d;
max:=a;
if b>max then max:=b;
if c>max then max:=c;
if d>max then max:=d;
s:=a+b+c+d-max-min;
p:=a*b*c*d div max div min;
write('s=',s,' p=',p);
readln
end.
1
|
|
|
2 / 2 / 1
Регистрация: 29.10.2008
Сообщений: 57
|
|
| 06.11.2008, 07:22 [ТС] | 5 |
|
спасибо!
0
|
|
| 06.11.2008, 07:22 | |
| 06.11.2008, 07:22 | |
|
Помогаю со студенческими работами здесь
5
задача на действительные числа.
Задача.Игра в числа Задача Петя и числа. Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
