1) Составьте программку вычисления сумму чисел от 1 до 100.2)Составьте программку

1) Составьте программку вычисления сумму чисел от 1 до 100.
2)Составьте программу вычисления произведения чётных чисел от 1 до 10.
3)Составьте программку вычисления количества двухзначных нечётных чисел.

Задать свой вопрос
Александра
Минуту не лицезрел вопроса просто)
Тимур Чекганов
Ничего) ты просто ангел,1 не делай
Дарина Зарипицина
Ой нет 1 надобно, у меня есть только сумма нечётных
1 ответ
1) var s,i:integer;begin s:=0; for i:=1 to 100 do  s:=s+i; writeln(s);end.2) var s,i:integer;begin s:=1; i:=2; while ilt;11 do  begin   s:=s*i;   i:=i+2;  end; writeln(s);end.3) var i,s:integer;begin i:=11; s:=0; while ilt;100 do  begin   i:=i+2;   s:=s+1;  end; writeln(s);end.

Julija Shavera
Ля
Лариса Шеломкова
Все в кучу
Arsenij Obarchuk
1) var s,i:integer;begin s:=0; for i:=1 to 100 do s:=s+i; writeln(s);end.2) var s,i:integer;begin s:=1; i:=2; while i<11 do begin s:=s*i; i:=i+2; end; writeln(s);end.3) var i,s:integer;begin i:=11; s:=0; while i<100 do begin i:=i+2; s:=s+1; end; writeln(s);end.
Вова Акшонин
та разберусь
Marija
Во
Karina Shiblina
Спасибо
Витька Катеков
Если верно сообразил условия то здесь все верно
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт