1) составьте программку, вычисляющую сумму квадратов всех чисел от 1 до

1) составьте программку, вычисляющую сумму квадратов всех чисел от 1 до N.
2) написать программу, определяющую сумму всех нечетных чисел от 1 до 99

Задать свой вопрос
1 ответ
1) var

i,n,s:integer;

begin readln(n);

s:=0;

for i:=1 to n do S:=s+i*i;

write(s); end.2) var

i,s:integer;

begin

s:=0;

i:=1;

while ilt;=99 do

begin

S:=s+i;

i:=i+2;

end; write(s); end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт