Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 21.08.2015
Сообщений: 66
1

Добавить к каждому числу единицу и вывести конечное

07.05.2016, 15:53. Показов 1128. Ответов 3
Метки нет (Все метки)

Добрый день, сразу объясню в чём задача
имеются числа, к примеру:
1 2 3 4 5 6 7 8 9 10
Нужно написать программу которая добавляла бы к каждому числу единицу и выводила конечное.
Конечное в этом примере:
2 3 4 5 6 7 8 9 10 11
пробовал макросом, но не получилось.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.05.2016, 15:53
Ответы с готовыми решениями:

Добавить к каждому введённому числу типа double единицу измерения
Здравствуйте. Уже долго бьюсь над эти заданием и никак не могу понять как его делать. вот условие...

Добавьте к каждому введенному числу типа doube единицу измерения
Добавьте к каждому введенному числу типа douЫe единицу измерения Допустимыми являются четыре...

Добавить к введенному числу единицу измерения
Задание: Добавьте к каждому введенному числу типа double единицу измерения; иначе говоря, введите...

Добавить к каждому числу, кроме последнего, значение следующего
Пожалуйста, помогите с задачкой. Проблема в составлении цикла do while (добавив к каждому числу,...

3
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
31193 / 20390 / 7941
Регистрация: 22.10.2011
Сообщений: 35,367
Записей в блоге: 6
07.05.2016, 16:10 2
Цитата Сообщение от akelvin Посмотреть сообщение
имеются числа
Имеются где? В воздухе? Где описание структуры данных, которая эти числа хранит?
0
Модератор
Эксперт по электронике
7667 / 3830 / 1484
Регистрация: 01.02.2015
Сообщений: 11,842
Записей в блоге: 2
07.05.2016, 16:31 3
И меня научите пользоваться макросами в FreePascal!
0
0 / 0 / 1
Регистрация: 22.01.2016
Сообщений: 3
09.05.2016, 15:41 4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
const n = 10
var i: byte;
     a: array[1..n] of integer;
Begin
 for i:=1 to n do
 begin
  write('a[',i,']: =  ');
  readln(a[i]);
  for i:=1 to n do 
   begin
    a[i]:=a[i]+1;
    write(a[i],'  ');
   end;
 end;
End.
Добавлено через 33 секунды
примерно так, набросал на лету, так что могут быть небольшие помарки, но приблизительно так, пробуйте
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.05.2016, 15:41

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

Добавить к каждому числу файла среднее арифметическое максимума и минимума
Записать выходной файл, добавить к каждому числу среднее арифметическое наименьшего по абсолютной...

Добавить к каждому числу полусумму всех отрицательных чисел последовательности
совсем не понимаю с++, а задача такая: для последовательности из 50 случайных чисел (deque)...

Прибавить единицу к введенному числу и вывести результат
Начал изучать Ruby по этому сайту http://www.shokhirev.com/mikhail/ruby/ltp/Chapter04.html Так...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.