Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
компьютер телфон и иже с ними
1)мобильный телефон, монитор, калькулятор, все эвм
program funkci9;
var y,x: integer;
begin
x: =-4;
writeln ('y x');
while x< =4 do
y: =abs(x+2)
writeln (y,' ',x);
x: =x+1;
end:
readln
end.
поиграйтесь с рисовкой =)
print "vvedite chislo x1! "input x1print "vvedite chislo x2! "input x2print "vvedite chislo y1! "input y1print "vvedite chislo y2! "input y2
clsscreen 12line (x1, , y2), 5, bfend
Популярные вопросы