langprint
?>

Составьте блок-схемы ко 2 задаче. (там написана ниже программа, я не знаю, правильная ли она)

Информатика

Ответы

Kati2005
Var        
R1, R2, R3, S1, S2, S3: Integer;        
begin             
writeln('Введите размеры рации и чемодана');             
readln(R1, R2, R3, S1, S2, S3);             
 if ((R1 < S1) and (R2 < S2) and (R3 < S3)) or             
((R3 < S3) and (R2 < S1) and (R1 < S2)) or             
((R1 < S1) and (R2 < S3) and (R3 < S3)) or             
((R2 < S2) and (R1 < S3) and (R3 < S1)) or             
 ((R2 < S1) and (R3 < S2) and (R1 < S3)) or             
((R1 < S2) and (R3 < S1) and (R2 < S3)) then
WriteLn('ПОМЕЩАЕТСЯ')  
 else
WriteLn('НЕ ПОМЕЩАЕТСЯ');
end.

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

Поделитесь своими знаниями, ответьте на вопрос:

Составьте блок-схемы ко 2 задаче. (там написана ниже программа, я не знаю, правильная ли она)
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

васильевич
dashanna04225
Мусаев Игоревич371
airon-082054
menametov
Андрей_Станиславовна
Avshirokova51
Тоноян
Larisa-0888716
Дарья16
ЮлияДаниил520
alexderru
anaissite6
david-arustamyan1
Оксана170