Даны три различных целых числа. Определить какое из них (первое,второе, третье) а)самое...

0 голосов
433 просмотров

Даны три различных целых числа. Определить какое из них (первое,второе, третье) а)самое маленькоеб) является средним(средним назовем число которое больше нам меньшего из данных чисел,но меньше наибольшего)


Информатика (60 баллов) | 433 просмотров
0

На каком языке?Basic? Или в Excel?

0

Paskal

0

подожди мин 20 выучу язык)

0

Спасибо:D

Дано ответов: 2
0 голосов
Правильный ответ

По моему так:
program p;
var
a,b,c:integer;
begin
writeln('первое число:');
readln(a);
writeln('второе число:');
readln(b);
writeln('третие число:');
readln(c);
if (a>b) and (a>c) then
writeln('Первое число является наибольшим');
if (a>b) and (ac) then
writeln('Первое число является средним');
if (a writeln('Первое число является наимешим');
if (b>a) and (b>c) then
writeln('Второе число является наибольшим');
if (b>a) and (bc) then
writeln('Второе число является средним');
if (b writeln('Второе число является наимешим');
if (c>b) and (c>a) then
writeln('Третие число является наибольшим');
if (c>b) and (c
a) then
writeln('Третие число является средним');
if (c writeln('Третие число является наимешим');
end.

(272 баллов)
0

Спасибо огромное)

0

стой там ощибки были я только щас исправил

0

теперь все правильно

0

ну и трудный же этот паскаль)

0 голосов

Решение :
Даны три различных целых числа: a=17, b= 10, c=6. 
Наибольшее a>b
a>c
Наименьшее ccСреднее bb>c 

Тебе код нужен?

(860 баллов)
0

Да нет спасибо)

0

Не за что

0

Тока мне программу было написать в paskal)

0

Сможете?) очень надо

0

Да