помогите пожалуйста! никак не могу решить
10-11 класс
|
const n=30;
var
a:array[1..n] of integer;
i,j,s:integer;
begin
for i:=1 to n do
readln(a[i]);
s:=0;
for i:=1 to n do
if (a[i]<100) and (a[i]>9) and ((a[i] div 10)>(a[i] mod 10)) then s:=s+a[i];
write(s);
end.
Другие вопросы из категории
информационный объём?
"В числовом массиве из 10 элементов, заданных с клавиатуры:
а) найти сумму положительных эелементов, стоящих на чётных местах;
б) найти произведение элементов массива, кратных 3 и стоящих на нечётных местах;
в) найти кол-во двузначных чисел в массиве."
СРОЧНО!!! Жду верного решения :) спасибо заранее
Читайте также
завтра сдаем тетради, а я не могу решить! (
паскаль.
Помогите пожалуйста,никак не пойму эту программу.
найти номер третьего положительного элемента в потоке из 10 чисел или сообщить,что трех положительных элементов нет. (Решать без массива)
Требуется написать Блокнот на делфи.
Написал всё, кроме кнопки "Сохранить" не пойму как сделать так, что бы при нажатии она работала как и в блакноте обычном.
Помогите пожалуйста :)
.................................................................................................................................
Возьмите прайс лист любого компьютерного магазина или скачайте в интернете;
Составьте конфигурацию компьютера для специалиста вашей профессии;
Подберите программное обеспечение, поясните, для каких целей будут служить данные программы;
Посчитайте общую стоимость данной конфигурации по прайс листу
....................................................................................................................................
Учусь я на бухгалтера-экономиста.
Давайте думать вместе) Допустим, "специалист вашей профессии" - это бухгалтер. Я беру прайс лист (т.е. лист, где написаны наименования и цены всех товаров). Что такое конфигурация? Как её составить по этому прайс листу, если там и так всего цена и наименования известны...?)))) ПО подобрать, допустим, это будет ;MS Office Excel; для создания таблиц, а для данной задачи для подсчёта общей стоимости конфигурации; и ;MS Office World; для писания отчётов. Что же такое эти "конфигурации"?)))
Помогите, пожалуйста) не пропускайте вопрос)