Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 977 ответов!

В общем, задача стоит такая - нарисовать таблицу, где будут выводить значения.

10-11 класс

Текст такой, но где-то есть ошибка.

Newrabota06 24 сент. 2013 г., 11:28:05 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Aidanakhan
24 сент. 2013 г., 13:30:13 (10 лет назад)

Решено в Турбо Паскаль 7.0

program tablica;

uses crt;

const
  UpperLeft = #218;
  UpperRight = #191;
  LowerLeft = #192;
  LowerRight = #217;
  Vertical = #179;
  Horizontal = #196;
  BranchLeft = #195;
  BranchRight = #180;

var
  i, x, lin: integer;

begin
  clrscr;
  {Шапка таблицы}
  Write(UpperLeft);
  for i := 1 to 10 do Write(Horizontal);
  Writeln(UpperRight);
  Writeln(Vertical, ' x    y   ', Vertical);
  Write(BranchLeft);
  {Тело таблицы}
  for i := 1 to 10 do Write(Horizontal);
  Writeln(BranchRight);
  for x := 0 to 10 do
  begin
    lin := 5 * sqr(x) + 3 * x + 2;
    Writeln(Vertical, x:2, lin:6,'  ',Vertical)
  end;
  {Последняя строка таблицы}
  Write(LowerLeft);
  for i := 1 to 10 do Write(Horizontal);
  Writeln(LowerRight);
  repeat until keypressed;
end.

Вывод дан во вложении.

+ 0 -
мариячумарина
24 сент. 2013 г., 15:25:49 (10 лет назад)

Комментарий удален

+ 0 -
Aleshaarkhipov
24 сент. 2013 г., 16:51:37 (10 лет назад)

Суть задания в том, что числа не должны считываться и вводиться, они заданы сразу. Нужно, чтобы программа посчитала то, что есть в диапазоне от 0 до 10.

Ответить

Читайте также

Помогите пожалуйста решить задачу в Excel.

В небольшом предприятии его сотрудникам выдаётся месячная зарплата. Кассир, имея на руках бухгалтерскую ведомость, собирается ехать в банк за деньгами. При этом он имеет возможность не просто подать заявку на общую сумму, а указать в ней также, какими именно купюрами ему хотелось бы получить её. Делается это для того, чтобы потом было удобнее рассчитываться с каждым отдельным работником (например, если выплаты производится, как говорят, «в конвертах»). Предварительно все исходные данные нужно представить в виде таблицы, где против каждой фамилии сотрудника, как только вводится начисленная ему зарплата, она тут же выражается соответствующим набором денежных знаков. Одновременно подводится и общий итог по всему коллективу для формирования банковского заказа. При определении набора следовать принципу наименьшего числа купюрРади упрощения задачи расчёт вести только на бумажные деньги с точностью до 10 рублей
Для расчётов использовать встроенные функции ЦЕЛОЕ и ОСТАТ из категории «математических» .

Здравствуйте) помогите составить задачи по паскалю)

задачи на такую тему: Составление, ввод, трансляция и
исполнение программ, реализующих
циклические алгоритмы и типовые
операции с одномерными массивами

1)Дан фрагмент электронной таблицы в режиме отображения формул.(фото с цифрой 1)

Какой вид примет таблица после выполнения команды:КОПИРОВАТЬ B1 в B2:B3.
2)Дан фрагмент электронной таблицы в режиме отображения формул.(фото с цифрой 2)
Чему будут равны значения клеток B2 и B3 в режиме отображения после выполнения команды: КОПИРОВАТЬ B1 в B2:B3.

Доброго времени суток, помогите пожалуйста с решением данной задачи, необходим код, для Turbo Pascal. Сама задача звучит так:

С клавиатуры вводится 3 числа, если сумма первого и последнего больше 10, то вывести эту сумму, если произведение больше 20, но меньше 30 (20>>30) то вывести это произведение, в противном случае вывести все эти 3 числа.



Вы находитесь на странице вопроса "В общем, задача стоит такая - нарисовать таблицу, где будут выводить значения.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.