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

Реклама
Madjahed
Alviko
Ну так чего спежить, есди "ЗДОВАТЬ" завтра?
Alviko
Опять за рыбу гроши! Чтобы силы сравнивать, надо знать плотности тела и жикости.
vladmor
Ребята в праздник учатся? Ну тогда из нашей переписки видно, что первая задача практически решена
Alviko
Если учатся, значит скорее всего Украина. Там теперь праздники свои и по другим датам.
ZusTY
По поводу третьей, можно же плотность жидкости вычислить делением массы на ее объем
сам хахол, я русский
ZusTY
а это все дано
Alviko
Так... ты там выражения выбирай... "русский он". Россия завтра 8 марта отмечает, какая учеба?
слышел что нибудь про электронные дневники
Alviko
Все, надоел ты, я ухожу.

Ответы и объяснения

ZusTY
Лучший Ответ!
ZusTY

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

var n,i,s:longint;
begin
read(n);
i:=25;
while i <= n do
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');
end.

5.0
2 оценки
2 оценки
Оцени!
Оцени!