Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
телевидение
радиовещание
интернет
газеты и т.д
qbasic
screen 7
input x
input y
input c
s=x+y/2*c
print "x+y/2*c="; s
end
var
a: array[1..31] of real;
i,k: integer;
min: real;
begin
min: =50;
for i: =1 to 31 do
readln(a[i]);
if a[i]< min then min: =a[i];
end;
k: =0;
if a[i]=min then k: =k+1;
writeln(k);
end.
по углам комнаты расставить 4 стула и около каждой стены по одному ( ещё 4 стула). всего 8 стульев : )
Популярные вопросы