writeln (' vvedite diametr kruga i storony kvadrata ');
readln (d);
readln (a);
if d< =a then writeln (' krug pomestits9 v kvadrate ')
else writeln (' krug ne pomestits9 v kvadrate ');
readln;
end.
Ответ дал: Гость
смотри описание блок схемы на картинке
Ответ дал: Гость
var a, b, c: integer;
begin
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
if a < b then if a < c then writeln(a, ' - меньшее') else writeln(c, ' - меньшее') else if b < c then writeln(b, ' - меньшее') else writeln(c, ' - меньшее'); end.
Популярные вопросы