ДАМ 99 БАЛОВ составить программы в паскале по карточке срочно

Question

ДАМ 99 БАЛОВ составить программы в паскале по карточке срочно

---

Comments

Ну так чего спежить, есди "ЗДОВАТЬ" завтра?

---

Опять за рыбу гроши! Чтобы силы сравнивать, надо знать плотности тела и жикости.

---

Ребята в праздник учатся? Ну тогда из нашей переписки видно, что первая задача практически решена

---

Если учатся, значит скорее всего Украина. Там теперь праздники свои и по другим датам.

---

По поводу третьей, можно же плотность жидкости вычислить делением массы на ее объем

---

сам хахол, я русский

---

а это все дано

---

Так... ты там выражения выбирай... "русский он". Россия завтра 8 марта отмечает, какая учеба?

---

слышел что нибудь про электронные дневники

---

Все, надоел ты, я ухожу.

Answer 1

1) Будем считать, что вводится число n, при котором считается сумма нечетных в промежутке [25;n]. // А так, если никакого ограничения сверху нет, то ответом будет +∞

var n,i,s:longint;
begin
read(n);
i:=25;
while i <= n do<br>begin
s:=s+i;
i:=i+2;
end;
write(s);
end.

2) 
var n:longint;
begin
read(n);
if n mod 2=0 write(n*n) else writeln(n*n*n);
end.

3)
var g,m,m1,v,v1:longint;
begin
readln(m, v);
readln(m1, v1);
g:=9,8;
if m*g<=(m1/v1)*g*v then write('YES') else writeln('NO');<br>end.