Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program qwerty; uses crt; var a: real; beginclrscr; writeln('введите количество миль'); readln(a); a: = a*1.6; writeln('кол-во киллометров - ',a: 2: 2); readkey; end.
program; var i: byte; str: string; begin for i: =60 to 70 do begin str: =str+chr(i) ; end; writeln(str); end.
writeln('a[',i,']=',a[i]);
readln;
end.
на листочке чертишь круг,берешь серединку,и получается- 4 клетки вниз и 7 в право
Популярные вопросы