Программа расчёта таблицы
Вложений: 1
Вот и начались мои тяжкие дни в универе. Сперва програмирование не понравилось так как я пропустил по болезне пару пар и не розобрался. Но когда нагнал упущеное стало даже интересно. Зделал пару робот. Но тут столкнулся с проблемой. Мне нужно научится пользоватся оператором FOR.
Гуглил - полезной информацыии не нашел. Моя задача: Спроектировать программу рощета таблиц между измирениями 1 морськая миля = 1.852 км =6076 футов Начальное значение мер, шаг изминения и количчество рядков в таблице задается диалогом. нужно оформить с использованием форматирования вывода. Мне не нужно писать всю программу так как я перепишу и ничего не научусь. мне подскажыте с чего начать. я малейшого понятия не имею.... Пример таблицы смотрим ниже в фото |
Что такое " рощета " ?
|
Вложений: 1
Цитата:
Вложение 98450 |
Цитата:
|
Ну так с освоения форматов вывода и надо начинать, с чего ж еще? А вообще - пробуй, выкладывай, спрашивай - поможем!
|
Цитата:
|
Сюда http://www.tehnari.ru/f22/t52621/ сходите, там есть вся нужная вам для освоения языка информация. А еще просто настоятельно советую прочитать эту книгу по теме, а также включить проверку орфографии в браузере, а то ошибки глаз режут.
|
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. Вот вроди закончил. =) |
Часовой пояс GMT +4, время: 08:30. |
Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.