 допоможіть з задачою |
Начальные контакты ТОЛЬКО через личку!!
| svetaj6 |
  12.12.2010 15:35
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 1 Пол: Женский Реальное имя: Світална Репутация:  0   |
знайти добуток парних чисел від 1 до 20.
будь ласка в паскалі скласти програму |
   |
 
|
  |
Ответов
| TommyG |
12.12.2010 17:59
Сообщение
#2
|
|
Новичок  Группа: Пользователи Сообщений: 17 Пол: Мужской Репутация: 0 |
Код var i:integer; p:extended; begin p:=1; for i:=2 to 20 do if i mod 2=0 then p:=p*i; writeln('proizvedenie ravno=',p); readln end. Сообщение отредактировано: TommyG - 12.12.2010 20:21 |
|
|
|
Сообщений в этой теме
svetaj6 допоможіть з задачою 12.12.2010 15:35
sheka Ги :)
А у Вас хоч якісь спроби були? Якщо так - в... 12.12.2010 16:16 TommyG Можно по русски? 12.12.2010 16:59 sheka Найти произведение четных чисел от 1 до 20. 12.12.2010 17:37 sheka svetaj6, попытайся в следующий раз попробовать сде... 12.12.2010 19:49 volvo Вообще-то
1) это раздел "на заказ"
2) п... 12.12.2010 19:57
TommyG 2 поправил свой код.теперь выводит.
1 не думаю, чт... 12.12.2010 20:22 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 19.06.2025 5:17 |