Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program d; var s : string; begins : = 'параллелограмм'; delete(s, 1, 9); delete(s, 3, 2); insert('о', s, 3); write(s); end.
var v1,v2,t,t1: real;
begin
read(v1,v2,t,t1);
writeln(v1*(t+t1)< =v2*t1);
end.
var s,x,n,i: integer;
read(x,n);
s: =1;
for i: = 1 to n do
s: =s*x;
writeln(s);
текстовый файл имеет расширение
1).txt
2).ini
3).doc
но чаще 1
Популярные вопросы