Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.
Внимание! Некоторое время письма не доходят до аккаунтов MAIL RU GROUP, не доходят на все почтовые ящики mail.ru, inbox.ru, bk.ru. Пишите им жалобы, чтобы быстрее восстановили получение писем, регистрируйтесь через яндекс почту и gmail, туда письма с активизацией доходят.

Вернуться   Форум программистов > Технологии > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 06.12.2018, 23:46   #1
Vitalik81311
Новичок
 
Регистрация: 28.10.2018
Сообщений: 2
Репутация: 10
По умолчанию Массивы

Люди, помогите, ни чего не пойму, у меня получается какой то бред в конце:
Нужно: Преобразовать двумерный массив R, разделив значение элементов
каждой строки на значение первого элемента этой строки ???
Вот код, напишите, если не трудно правильный, пожалуйста...
Код:

Код:

procedure TForm1.FormCreate(Sender: TObject);
const
R:array [0..4,0..3] of string=
(('2,8','-12','4','1,5'),
('0','0','-3,2','-4'),
('1,8','4,2','-1,8','-3,5'),
('0','-6','0','-2'),
('-3','0','4,9','8,6'));
var
 i,j:integer;
begin
for i:=0 to 4 do
for j:=0 to 3 do
StringGrid1.Cells[j,i]:=R[i,j];
end;

procedure TForm1.Button1Click(Sender: TObject);
var
i,j:integer;

begin

for i:=0 to 4 do

for j:=0 to 3 do begin
if R[i,0]=0 then
label1.Caption:=label1.Caption+('деление на 0') else begin R[i,j]:=Trunc(R[i,j]/R[i,0]);
end;
end;

label1.Caption:=Label1.Caption( 'R[',i,',',j,']=',R[i,j]);
end;
end.

Vitalik81311 вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
написать программу массивы (C++) - Даны два массива, скопировать эти массивы в 3-й результирующий (размером 10 элементов) так, что Саша1990 Помощь студентам 1 02.02.2015 17:03
Одномерные массивы, двумерные массивы, строки Sand093 C++ Builder 11 20.05.2012 21:48
Двумерные массивы(матрица) 2)Строковые массивы(строки): 3)Структуры nuriyat Помощь студентам 1 21.01.2012 16:16
Двумерные массивы(массивы указателей на массивы) krytishka99 Помощь студентам 1 29.12.2011 19:51
Даны одномерные массивы А и В. Сформировать массивы, состоящие из элемент LyaLya Помощь студентам 15 20.12.2009 15:12


10:11.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru