Есть ответ 👍

Прошу q_q 1) даны три числа вывести их в порядке возрастания . составить алгоритм в паскале. 2)определить пройдёт ли кирпич с рёбрами a,b,c в прямоугольное отверстие со сторонами x и y. алгоритм в паскале.

113
309
Посмотреть ответы 2

Ответы на вопрос:


#1:

 

const count = 3; // количество проверяемых чисел

 

var m : array [1..count] of integer; i, e, c: integer; begin

writeln('введите числа: '); for i : = 1 to count do begin write(i ,': '); readln( m[i] ); end; for i : = 1 to count do for e : = 1 to count do if m[i] < m[e] then begin c : = m[i]; m[i] : = m[e]; m[e] : = c; end; for i : = 1 to count do write(m[i], ' '); readln; end.

 

#2:

 

var a, b, c, x, y: integer; begin

writeln('введите рёбра кирпича: '); write('a: '); readln( a ); write('b: '); readln( b ); write('c: '); readln( c ); writeln('введите стороны отверстия: '); write('x: '); readln( x ); write('y: '); readln( y );

x : = x*y; if (a*b < = x) or (a*c < = x) or (b*c < = x) then write('пройдёт.') else write('не пройдёт.'); readln; end.

 


не знаю в каком виде это должно быть

 

1 ввод возрастов

2 если s> m то пишем "саша старше маши "

3 иначе если s=m то пишем "саша и маша ровестники"

4 иначе пишем "маша старше саши"

 

в первом нет строчки 3

Популярно: Информатика