1. 

   sa_sha New Member

   Дан массив состоящий из 10 элементов введенных с клавиатуры вывести номера элементов массива сумма цифр которых равна5.

    

   sa_sha, 20 янв 2010

   #1
2. 

   alekc New Member

    
   uses crt;
   var i:integer;
   a:array[1..10] of integer;
   
   begin
   randomize;
   for i:=1 to 10 do a:=random(99)+1;
   for i:=1 to 10 do
   begin
   if ( (a div 10) + (a mod 10) ) = 5 then
   write(a,' ');
   end;
   writeln;
   
   readln;
   end.
   

    

   alekc, 20 янв 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня