Составьте программу в паскале. условный оператор. ввести число а. начертить вертикальную линию в левой части экрана если a< 0 и в правой части экрана в противном случае. данные a=-20 (результат в левой части), а=20 (результат в правой части).

АринаДаутова АринаДаутова    3   28.06.2019 16:10    0

Ответы
vaierchik vaierchik  02.10.2020 14:14
Uses graphabc;
var a:integer;
begin
readln(a);
setwindowsize(640,640);
if(a<0) then 
begin
Line(100,100,100,600);
end
else
Line(600,100,600,600);
end.
ПОКАЗАТЬ ОТВЕТЫ