Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
vara,b: integer; c: real; beginwriteln ('1'); read (a); writeln ('2'); read (b); c: =(a/1)/(1/b); writeln (c); end.
3+3-3: 3=5
3-3+3+3=6
3: 3+3+3=7
3*3-3: 3=8
3*3*3: 3=9
3* 3+3: 3 = 10
var
i,s: longint;
begin
for i: =20 to 60 do if i mod 5=0 then inc(s,i);
writeln(s);
end.
2^3 = 8 цветов (скорее всего оттенки серого)
Популярные вопросы