Определить сколько монет достоинством в 20 и 50 рублей и каковы их порядковые номера

@joipoc · Регистрация: 08.03.2011

Author24 — интернет-сервис помощи студентам

В коллекции нумизмата не более чем 90 монет всех возможных достоинств.Определить сколько монет достоинством в 20 и 50 рублей и каковы их порядковые номера.

Заранее спасибо.

@Merlin666 · 11.03.2011, 13:29

Держи:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
program test;
uses crt;
const nmax=100;
var a: array[1..100] of integer;
    n,i,sum1,sum2: integer;
Begin
 write('N = '); readln(n);
 
 writeln('Massive:');
 for i:=1 to n do
  read(a[i]);
  
 for i:=1 to n do
 begin
  if (a[i]=20) then
  begin
   writeln('Index of 20: ',i);
   inc(sum1);
  end
  else if (a[i]=50) then
  begin
   writeln('Index of 50: ',i);
   inc(sum2);
  end;
 end;
 
 writeln('Count of 20: ',sum1);
 writeln('Count of 50: ',sum2);
End.

@joipoc · 11.03.2011, 21:30 **[ТС]**

Спасибо большое!

Новые блоги и статьи Все статьи Все блоги /
Простая нейросеть на КуМир: Создание и обучение EggHead 16.03.2025 Искусственные нейронные сети — удивительная технология, позволяющая компьютерам имитировать работу человеческого мозга. Если вы хотя бы немного интересуетесь современными технологиями, то наверняка. . .	Исполнитель Кузнечик в КуМир: Решение задач EggHead 16.03.2025 Среди множества исполнителей в системе КуМир особое место занимает Кузнечик — простой, но невероятно полезный виртуальный персонаж, который перемещается по числовой прямой, выполняя ваши команды. На. . .	Исполнитель Водолей в КуМир: Решение задач EggHead 16.03.2025 Разработка алгоритмического мышления — одна из ключевых задач для начинающих программистов, и система КуМир предлагает отличный способ погрузиться в этот процесс. Среди множества исполнителей в этой. . .	Исполнитель Чертежник в КуМир: Решение задач EggHead 16.03.2025 Представьте, что вы можете рисовать на бесконечной координатной плоскости, перемещая точку, которая оставляет след. По вашей команде она может поднять перо и двигаться, не оставляя следа, или. . .	Исполнитель Робот в КуМир: Решение задач EggHead 16.03.2025 КуМир (Комплект Учебных МИРов) — это учебная среда программирования, разработанная специально для обучения базовым концепциям алгоритмизации. Её главная фишка — использование русскоязычного. . .
Исполнитель Черепаха в КуМир: Решение задач EggHead 16.03.2025 Представьте, что вы впервые учитесь программировать, а перед вами стоит задача заставить маленькую виртуальную черепашку рисовать на экране. Звучит забавно? Эта идея зародилась ещё в 1967 году, когда. . .	Конвейеры данных с Apache Kafka Javaican 16.03.2025 В мире, где данные стали новой нефтью, Apache Kafka зарекомендовал себя как мощный инструмент для построения надежных и масштабируемых конвейеров данных. Созданный изначально командой LinkedIn в 2011. . .	Deno против Node.js: Будущее JavaScript рантайма run.dev 16.03.2025 За последнее десятилетие Node. js стал абсолютным лидером среди JavaScript-рантаймов и фактическим стандартом для серверной разработки на JavaScript. Но в 2018 году тот же разработчик, который создал. . .	SwiftUI или UIKit - что выбрать для нового приложения iOS? mobDevWorks 16.03.2025 Когда Apple представила SwiftUI на WWDC 2019, многим показалось, что дни UIKit сочтены. Новый декларативный фреймворк предлагал радикально иной подход к разработке интерфейсов. Вместо кропотливого. . .	Docker: Руководство для начинающих по созданию первого приложения Mr. Docker 16.03.2025 Docker — это платформа, которая упаковывает ваше приложение и все его зависимости в стандартизированные блоки, называемые контейнерами. Эти контейнеры изолированы друг от друга и от основной системы,. . .

@joipoc 0 / 0 / 0 Регистрация: 08.03.2011 Сообщений: 10
		1
	Определить сколько монет достоинством в 20 и 50 рублей и каковы их порядковые номера 11.03.2011, 13:22. Показов 3801. Ответов 2 Метки нет (Все метки) В коллекции нумизмата не более чем 90 монет всех возможных достоинств.Определить сколько монет достоинством в 20 и 50 рублей и каковы их порядковые номера. Заранее спасибо. 0

@joipoc 0 / 0 / 0 Регистрация: 08.03.2011 Сообщений: 10
	11.03.2011, 21:30 [ТС]	3
	Спасибо большое! 0

Опции темы

Определить сколько монет достоинством в 20 и 50 рублей и каковы их порядковые номера

Решение