Цикл с параметром: определить, сколько чисел из последовательности принимает максимальное значение

@Trumens · Регистрация: 17.05.2014

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

Добрый день. Помогите пожалуйста с программой. Нужно составить программу используя цикл с параметром.
Задана последовательность из n целых числе. Определить , сколько из них принимает максимальное значение. И еще кто может нарисовать блок схему к этой программе)

@droider · 17.05.2014, 13:48

Trumens, стоило ли создавать новую тему?
Определить, сколько чисел последовательности принимает наибольшее значение
Код на Pascal, но я уверен, что Вы сами постараетесь, и без труда переведете его на Delphi

Сообщение от Trumens

кто может нарисовать блок схему к этой программе

Карандаш... на бумаге с помощью Вашей руки или программа Visual Code to FlowChart.

@Trumens · 17.05.2014, 14:03 **[ТС]**

Дело в том что я не разбираюсь в программирование , и не знаю как сделать блок схему ((

@FIL · 17.05.2014, 14:07

Сообщение от Trumens

Дело в том что я не разбираюсь

Задания для того и даются, чтобы ты начал разбираться.

@Trumens · 17.05.2014, 14:15 **[ТС]**

Вот и хочу понять что да как , если увижу наглядно то и пойму принцип

Добавлено через 3 минуты

Сообщение от droider

стоило ли создавать новую тему?
Определить, сколько чисел последовательности принимает наибольшее значение
Код на Pascal, но я уверен, что Вы сами постараетесь, и без труда переведете его на Delphi

Это все не то нужно программу с помощью оператора цикл с параметром

@FIL · 17.05.2014, 14:18

Сообщение от Trumens

если увижу наглядно

Тебе уже дали ссылку на готовые решения.
Ты их увидел наглядно.
И что изменилось?

@Trumens · 17.05.2014, 14:19 **[ТС]**

Сообщение от FIL

Тебе уже дали ссылку на готовые решения.
Ты их увидел наглядно.
И что изменилось?

Я про блок схему имею ввиду
А наглядное решение программ я ответил что это все не то

@droider · 17.05.2014, 14:51

Сообщение от Trumens

это все не то

с чего Вы так решили?

@FIL · 17.05.2014, 15:00

Не по теме:

Сообщение от droider

с чего Вы так решили?

Потому что в коде нигде не написано "цикл с параметром", а это надо по заданию.

@Trumens · 17.05.2014, 15:36 **[ТС]**

Ладно хорошо
вот эта вот программа например не работает

Delphi

var
  n,i,max,k,x: integer;
begin
  write('Сколько чисел будем вводить? ');
  readln(n);
  write('Введите 1-е число: ');
  readln(max); k:=1;
  for i:=2 to n do
  begin
    write('Введите ',i,'-е число: ');
    readln(x);
    if x>max then
    begin
      max:=x;
      k:=1;
    end else if x=max then inc(k);
  end;
  writeln('Наибольшее число = ',max,', таких чисел ',k,' в последовательности');
  readln;
end.

@droider · 17.05.2014, 16:08

Не по теме:

Сообщение от FIL

в коде нигде не написано "цикл с параметром",

Конечно! Это все меняет:) Согласись, весело иногда на форуме бывает...

Сообщение от Trumens

эта вот программа например не работает

Уверены? А это что?

@droider · 17.05.2014, 16:11

Trumens, кстати, уважаемый ТС, в алгоритме применен цикл с параметром

@droider 4901 / 2771 / 851 Регистрация: 04.10.2012 Сообщений: 10,095
	17.05.2014, 16:11	12
	Trumens, кстати, уважаемый ТС, в алгоритме применен цикл с параметром 0

@Trumens 0 / 0 / 0 Регистрация: 17.05.2014 Сообщений: 20
		1
	Цикл с параметром: определить, сколько чисел из последовательности принимает максимальное значение 17.05.2014, 13:27. Показов 1558. Ответов 11 Метки нет (Все метки) Добрый день. Помогите пожалуйста с программой. Нужно составить программу используя цикл с параметром. Задана последовательность из n целых числе. Определить , сколько из них принимает максимальное значение. И еще кто может нарисовать блок схему к этой программе) 0

@droider 4901 / 2771 / 851 Регистрация: 04.10.2012 Сообщений: 10,095
	17.05.2014, 13:48	2
	Trumens, стоило ли создавать новую тему? Определить, сколько чисел последовательности принимает наибольшее значение Код на Pascal, но я уверен, что Вы сами постараетесь, и без труда переведете его на Delphi Сообщение от Trumens кто может нарисовать блок схему к этой программе Карандаш... на бумаге с помощью Вашей руки или программа Visual Code to FlowChart. 0

@Trumens 0 / 0 / 0 Регистрация: 17.05.2014 Сообщений: 20
	17.05.2014, 14:03 [ТС]	3
	Дело в том что я не разбираюсь в программирование , и не знаю как сделать блок схему (( 0

@FIL Модератор 3488 / 2611 / 741 Регистрация: 19.09.2012 Сообщений: 7,972
	17.05.2014, 14:07	4
	Сообщение от Trumens Дело в том что я не разбираюсь Задания для того и даются, чтобы ты начал разбираться. 0

@Trumens 0 / 0 / 0 Регистрация: 17.05.2014 Сообщений: 20
	17.05.2014, 14:15 [ТС]	5
	Вот и хочу понять что да как , если увижу наглядно то и пойму принцип Добавлено через 3 минуты Сообщение от droider стоило ли создавать новую тему? Определить, сколько чисел последовательности принимает наибольшее значение Код на Pascal, но я уверен, что Вы сами постараетесь, и без труда переведете его на Delphi Это все не то нужно программу с помощью оператора цикл с параметром 0

@FIL Модератор 3488 / 2611 / 741 Регистрация: 19.09.2012 Сообщений: 7,972
	17.05.2014, 14:18	6
	Сообщение от Trumens если увижу наглядно Тебе уже дали ссылку на готовые решения. Ты их увидел наглядно. И что изменилось? 0

@Trumens 0 / 0 / 0 Регистрация: 17.05.2014 Сообщений: 20
	17.05.2014, 14:19 [ТС]	7
	Сообщение от FIL Тебе уже дали ссылку на готовые решения. Ты их увидел наглядно. И что изменилось? Я про блок схему имею ввиду А наглядное решение программ я ответил что это все не то 0

@droider 4901 / 2771 / 851 Регистрация: 04.10.2012 Сообщений: 10,095
	17.05.2014, 14:51	8
	Сообщение от Trumens это все не то с чего Вы так решили? 0

@FIL
	17.05.2014, 15:00 #9
	Не по теме: Сообщение от droider с чего Вы так решили? Потому что в коде нигде не написано "цикл с параметром", а это надо по заданию. 0

@droider 4901 / 2771 / 851 Регистрация: 04.10.2012 Сообщений: 10,095
	17.05.2014, 16:08	11
	Не по теме: Сообщение от FIL в коде нигде не написано "цикл с параметром", Конечно! Это все меняет:) Согласись, весело иногда на форуме бывает... Сообщение от Trumens эта вот программа например не работает Уверены? А это что? Миниатюры 0

Опции темы