костер: в древности люди разжигали костры, дым от которых был виден за сотни километров. они служили визуальными сигналами, оповещали о чем-то, например об опасности.
сумка с конвертами внутри: это атрибутика почтальона, разносящего письма.
барабан: барабанная дробь, так же символ передачи информации, но уже звуковой. это происходило в старые времена во время военных баталий, так же при военных построениях и парадах, что происходит и по сегодняшний день, барабанный дробь отбивает такт, под который маршируют солдаты.
Ответ дал: Гость
1)
var
s: string;
begin
s: ='пробел';
writeln(s);
delete(s,4,1);
insert('д',s,4);
writeln(s);
end.
2)
var
i: integer;
a,b: string;
begin
readln(a);
b: ='';
for i: =1 to length(a) do
b: =b+a[i]+' ';
writeln(b);
end.
3)
var
a: string;
begin
readln(a);
if a[2]=a[4] then writeln('равны')
else writeln('не равны');
end.
Ответ дал: Гость
qbasic
screen 7
input x
input y
input c
s=x+y/2*c
print "x+y/2*c="; s
end
Ответ дал: Гость
var s,a,i: real;
begin
repeat
writeln("вес следущего пасажира kg");
read(a);
s: =s+a;
if s< 8000 then
i: =i+1;
until s> =8000
writeln(i);
end.
var b,a,i: real;
begin
read(a,b);
repeat
a: =a+a*0.03;
i: =i+1;
until a> =b
writeln(i);
end.
var i,s: integer;
begin
for i: = 1900 to 1999 do begin
s: =s+365;
if (i mod 400=0) or ((i mod 4 = 0) and (i mod 100< > 0)) then
Популярные вопросы