Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
для pascal abc
uses graphabc; begin window.title : = 'apple'; var y,y0,x,t: integer; brush.color : = clgreen; y0: =70; x: =70; lockdrawing; for t : = 0 to 8 do begin y: =y0+5*t*t; window.clear(clwhite); circle(x,y,50); redraw; sleep(100); end; end.
1) через горячие клавиши
вынесением кнопок в панель инструментов (word например)
через консоль, если таковая имеется (например vi)
жестами мышки (opera)
голосовыми (opera)
2)delete (del), copy(ctrl+c), cut(shift+del), paste(ctrl+v)
3) open(ctrl+o), save(ctrl+s)
var s: string; begin writeln('как вас зовут? '); readln(s); case s of 'вася': s: ='василий'; 'петя': s: ='петр'; 'люся': s: ='людмила'; 'миха': s: ='михаил'; 'пупс': s: ='пупондий'; else s: ='я с вами не знакома'; end; writeln(s); readkey; end.
var v1,v2,t,t1: real;
begin
read(v1,v2,t,t1);
writeln(v1*(t+t1)< =v2*t1);
end.
Популярные вопросы