Высокий балл, первому лучший ответВ массиве содержатся целые числа. Посчитать количество двузначных элементов массива, сумма цифр которых кратна семи. Предусмотреть случай когда таких чисел в массиве нет.Подкорректировать код сделать правильным т.е. в коде не считает сумму цифр и все вроде.Файл ниже.
var a:array[1..100] of integer;i,n,k,s,p:integer;beginreadln(n);for i:=1 to n doreadln(a[i]);for i:=1 to n do begin p:=a[i]; s:=0; if (p>9) and (p<100) then while p<>0 do begin s:=s+p mod 10; p:= div 10; end; if (s mod 7 = 0) and (a[i]>0) then inc (k); end;write (k);end.P.S. Надеюсь на благодарность и лучший ответ.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Высокий балл, первому лучший ответВ массиве содержатся целые числа. Посчитать количество двузначных элементов массива, сумма цифр которых кратна семи. Предусмотреть случай когда таких чисел в массиве нет.Подкорректировать код сделать правильным т.е. в коде не считает сумму цифр и все вроде.Файл ниже.» от пользователя Алиса Швец в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!