Форум » Массивы, сортировка, работа с файлами » C2 из тренировочной! Помогите решить! » Ответить
C2 из тренировочной! Помогите решить!
Дмитрий: Опишите алгоритм, позволяющий найти и вывести сумму таких элементов массива, которые являются двузначными числами и произведение цифр больше 10. const N=30; Var a:array [1..N] of integer; i, j, s: integer; begin for i:=1 to N do readln(a); … end.
Ответов - 2
oval: в S записываем 0 для i от 1 до 30 перебираем все a[ i ], если для a[ i ] выполняется условия 10 <= a[ i ] <= 99 и (a[ i ] mod 10)*(a[ i ] div 10)>10 тогда добавляем a[ i ] к S печатаем S
1ро4ка_двадва88: двузначные, произведение больше 10 const N=30; var a:array [1..N] of integer; i, j, s: integer; begin for i:=1 to N do readln(a); s:=0; for i:=1 to N do if (a>9) and (a<100) and (a mod 10)*(a div 10)>10 then s:=s+a; writeln(s); end. че-то баг какой-то, курсив убирает индекс массива
полная версия страницы