Создать массив генератором случайных чисел и найти сумму его элементов

28.09.2011, 17:12. **Показов** 2003. **Ответов** 3

Author24 — интернет-сервис помощи студентам

Создать массив М(10) генератором случайных чисел из отрезка [-10..10]. И вывести их сумму.
решите плз. составьте программу. до завтра уже нужно решение. иначе. все.

@Xentar · 28.09.2011, 17:27

Delphi

program Program_rogramm;
var ya_tvoy_dom_truba_shatal:array[0..10] of real;
         shataliti:integer;
         pedobear_shatun:real;
begin
   pedobear_shatun:=0;
    randomize; 
    for shataliti:=0 to 10 do ya_tvoy_dom_truba_shatal[shataliti]:=random(20)-10;
    for shataliti:=0 to 10 do pedobear_shatun:=pedobear_shatun+ya_tvoy_dom_truba_shatal[shataliti];
    writeln(pedobear_shatun);
end.

@Puporev · 28.09.2011, 17:40

Pascal

1	random(21)-10;

@Xentar · 28.09.2011, 17:57

Извиняюсь - да ошибся.

Nailek
		1
	Создать массив генератором случайных чисел и найти сумму его элементов 28.09.2011, 17:12. Показов 2003. Ответов 3 Метки нет (Все метки) Создать массив М(10) генератором случайных чисел из отрезка [-10..10]. И вывести их сумму. решите плз. составьте программу. до завтра уже нужно решение. иначе. все.

@Xentar Of Wolf and Man 999 / 198 / 5 Регистрация: 09.07.2008 Сообщений: 1,784
	28.09.2011, 17:57	4
	Извиняюсь - да ошибся. 0