Найти элемент строки, принадлежащий наибольшему количеству столбцов

@RakhimBek · Регистрация: 15.02.2012

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

наити элемент строки принадлежащий наибольшему количеству столбцов ))
желательно без применения указателей я не знаю их
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
отд вопрос
как записать фаил . сохранить и открыть по новой ?

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
uses crt;
 const n=10;
  var
 mas: array [1..n] of integer;
 TFile: Text;
  i: integer;
 
 begin
    clrscr;
 
////////////////////////////////////////////////
  assign(TFile,'Input.txt');
  rewrite(TFile);
/////////////////////////////////////////////
writeln('input');
 
 
  for i:=1 to n do  mas[i]:=random(10) ;
  for i:=1 to n do  write(TFile,mas[i]);
   close(tfile);
////////////////////////////////////////////
  assign(TFile,'Input.txt');
  for i:=1 to n do  read(TFile,mas[i]);
/////////////////////////////////////////////////
  close(TFile);
end.

правилно ли направление писанины ? в чем ошибка

@Gorev · 19.02.2012, 23:23

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

for i:=1 to n do mas[i]:=random(10) ;
for i:=1 to n do write(TFile,mas[i]);

Здесь вы записываете данные в файл.

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

for i:=1 to n do read(TFile,mas[i]);

А здесь читаете из файла и здесь вы забыли его открыть.
По моему вы перепутали начало и конец.
Основные команды для файлов:
assign(f,'input.in')-связь файла f с файлом input.in.
read(f,a)-чтение из файла в переменную а.
write(f,a)-запись в файл из переменной а.
rewrite(а)-переписать или создать файл f, при открытии таким способом все стирается.
reset(f)-открытие файла f.
close(f)-закрытие файла f.

@RakhimBek · 25.03.2012, 19:21 **[ТС]**

можно ли удалить тему ?\

@Дмитрий1994 · 25.03.2012, 21:38

напишите реальное решение задач

@RakhimBek · 05.05.2012, 08:14 **[ТС]**

всмысле ))
немене керек ?

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@RakhimBek 165 / 1 / 1 Регистрация: 15.02.2012 Сообщений: 41
	25.03.2012, 19:21 [ТС]
	можно ли удалить тему ?\ 0

@Дмитрий1994 0 / 0 / 0 Регистрация: 23.03.2012 Сообщений: 6
	25.03.2012, 21:38
	напишите реальное решение задач 0

@RakhimBek 165 / 1 / 1 Регистрация: 15.02.2012 Сообщений: 41
	05.05.2012, 08:14 [ТС]
	всмысле )) немене керек ? 0