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

iulia085 iulia085    2   21.05.2019 17:20    0

Ответы
jrihdevhdve jrihdevhdve  16.06.2020 13:46

 

uses crt;
var i:integer;
a:array[1..10] of integer;

begin
randomize;

for i:=1 to 10 do a[i]:=random(99)+1;

for i:=1 to 10 do
begin
if ( (a[i] div 10) + (a[i] mod 10) ) = 5 then
write(a[i],' ');

end;
writeln;


readln;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика