Программа расчёта таблицы

xFOXpp · 28.09.2012, 15:04

Вот и начались мои тяжкие дни в универе. Сперва програмирование не понравилось так как я пропустил по болезне пару пар и не розобрался. Но когда нагнал упущеное стало даже интересно. Зделал пару робот. Но тут столкнулся с проблемой. Мне нужно научится пользоватся оператором FOR.
Гуглил - полезной информацыии не нашел.
Моя задача:
Спроектировать программу рощета таблиц между измирениями
1 морськая миля = 1.852 км =6076 футов

Начальное значение мер, шаг изминения и количчество рядков в таблице задается диалогом. нужно оформить с использованием форматирования вывода.
Мне не нужно писать всю программу так как я перепишу и ничего не научусь. мне подскажыте с чего начать. я малейшого понятия не имею....
Пример таблицы смотрим ниже в фото

Юрий-dos · 28.09.2012, 15:06

Что такое " рощета " ?

Vladimir_S · 28.09.2012, 15:20

Цитата:

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

Вот и начались мои тяжкие дни в универе.

Роман, ну что за дела? Еще для тебя, как для новичка зеленого, не хватало вывешивать это художество:

xFOXpp · 28.09.2012, 15:33

Цитата:

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

Роман, ну что за дела? Еще для тебя, как для новичка зеленого, не хватало вывешивать это художество:
Вложение 98450

ая яй! Вот забыл. Паскаль

Vladimir_S · 28.09.2012, 15:38

Ну так с освоения форматов вывода и надо начинать, с чего ж еще? А вообще - пробуй, выкладывай, спрашивай - поможем!

xFOXpp · 28.09.2012, 15:40

Цитата:

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

Ну так с освоения форматов вывода и надо начинать, с чего ж еще? А вообще - пробуй, выкладывай, спрашивай - поможем!

Ща буду пробувать.

AlexZir · 28.09.2012, 16:00

Сюда Справочники, мануалы и прочая литература по теме форума сходите, там есть вся нужная вам для освоения языка информация. А еще просто настоятельно советую прочитать эту книгу по теме, а также включить проверку орфографии в браузере, а то ошибки глаз режут.

xFOXpp · 03.10.2012, 20:56

uses CRT;
var
i,k,step,n,j:integer;
begin
clrscr;
write ('vvedite na4alnoe zna4enie');
readln(k);
write ('vvedite shag izmineniya');
readln(step);
write('vvedite koli4estvo strok [10..15]: ');
readln(n);
writeln('Morskaya milia':10, 'Km':10, 'Fyti':10);
j:=k;
for i:=k to n do
begin
writeln(j, ' ', j*1.852:6:3, ' ' , j*6076);
j:=j+step;
end;
readkey;
end.

Вот вроди закончил. =)

28.09.2012, 15:04	#1 (permalink)
xFOXpp Member Регистрация: 14.03.2011 Сообщений: 957 Записей в дневнике: 14 Сказал(а) спасибо: 0 Поблагодарили 18 раз(а) в 4 сообщениях Репутация: 4616	Программа расчёта таблицы Вот и начались мои тяжкие дни в универе. Сперва програмирование не понравилось так как я пропустил по болезне пару пар и не розобрался. Но когда нагнал упущеное стало даже интересно. Зделал пару робот. Но тут столкнулся с проблемой. Мне нужно научится пользоватся оператором FOR. Гуглил - полезной информацыии не нашел. Моя задача: Спроектировать программу рощета таблиц между измирениями 1 морськая миля = 1.852 км =6076 футов Начальное значение мер, шаг изминения и количчество рядков в таблице задается диалогом. нужно оформить с использованием форматирования вывода. Мне не нужно писать всю программу так как я перепишу и ничего не научусь. мне подскажыте с чего начать. я малейшого понятия не имею.... Пример таблицы смотрим ниже в фото Миниатюры

28.09.2012, 15:04
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Разумеется, на нашем форуме так же нашлись и похожие темы Добавление таблицы на сайт с SMC Joomla Таблицы, есть наработки, C++ Проблема с DLE при добавлении таблицы Программа расчёта трансформаторов Связать 2 Excel таблицы в Wordе

28.09.2012, 15:06	#2 (permalink)
Юрий-dos начинающий Регистрация: 04.10.2011 Сообщений: 3,318 Сказал(а) спасибо: 2 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 8524	Что такое " рощета " ?

28.09.2012, 15:38	#5 (permalink)
Vladimir_S Специалист Регистрация: 27.08.2008 Адрес: Санкт-Петербург Сообщений: 27,807 Сказал(а) спасибо: 340 Поблагодарили 583 раз(а) в 208 сообщениях Репутация: 113184	Ну так с освоения форматов вывода и надо начинать, с чего ж еще? А вообще - пробуй, выкладывай, спрашивай - поможем!

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

28.09.2012, 16:00	#7 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	Сюда Справочники, мануалы и прочая литература по теме форума сходите, там есть вся нужная вам для освоения языка информация. А еще просто настоятельно советую прочитать эту книгу по теме, а также включить проверку орфографии в браузере, а то ошибки глаз режут.

03.10.2012, 20:56	#8 (permalink)
xFOXpp Member Регистрация: 14.03.2011 Сообщений: 957 Записей в дневнике: 14 Сказал(а) спасибо: 0 Поблагодарили 18 раз(а) в 4 сообщениях Репутация: 4616	uses CRT; var i,k,step,n,j:integer; begin clrscr; write ('vvedite na4alnoe zna4enie'); readln(k); write ('vvedite shag izmineniya'); readln(step); write('vvedite koli4estvo strok [10..15]: '); readln(n); writeln('Morskaya milia':10, 'Km':10, 'Fyti':10); j:=k; for i:=k to n do begin writeln(j, ' ', j1.852:6:3, ' ' , j6076); j:=j+step; end; readkey; end. Вот вроди закончил. =)