1. Информатика
  2. Ввести 7 чисел и найти их

Ввести 7 чисел и найти их сумму используя только 3 переменных

Aixerel Aixerel    3   19.08.2019 01:30    1

Ответы
хорошист537 хорошист537  05.10.2020 03:53
Var
   a,b,c:integer;
begin
  for a:=1 to 7 do
  begin
    readln(b);
    c:=c+b;
  end;
  writeln('Сумма ',c);
end.  
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
AndreyMiix AndreyMiix  10.12.2020 21:06
Рассматривается множество целых чисел, принадлежащих числовому отрезку [4197; 9182], которые делятся на 5 и не делятся на 6, 10, 13, 16. Найдите количество таких чисел...
Назка2006 Назка2006  10.12.2020 21:05
Написать программу создающую массив из N целых элементов со случайными значениями в диапазоне [-50; 50]. Подсчитать среднее арифметическое элементов массива, кратных трем....
SXTN SXTN  10.12.2020 21:05
Расмотрите рисунок.Какие графические примитивы были использованы?​...
AndruxaS AndruxaS  10.12.2020 21:04
1)Рассмотрите таблицу. А) Напишите порядок действия создания данной таблицыБ) Из скольки строк и столбцов состоит эта таблица?СтрокСтолбцов В) Как удалить столбец из таблицы?...
yulakri yulakri  04.12.2019 12:35
Решить в python. 1)банкомат. в банкомате имеются в достаточном количестве купюры номиналом 10, 20, 50, 100, 200 и 500 гривен найти минимальное количество купюр, которое...
marius95 marius95  04.12.2019 12:36
Дан текст. вывести в алфавитном порядке все буквы текста, входящие в него не менее двух раз. (pascal)...
ТКУиК9ks11 ТКУиК9ks11  04.12.2019 12:37
Ввести с клавиатуры число n – количество элементов одномерного массива. последовательно ввести с клавиатуры все элементы массива. отсортировать его по возрастанию модифицированным...
Fsyh Fsyh  04.12.2019 12:40
Умоляю решите! f = ax2 + b, при х 0 и b ≠ 0; x - 2 - , при x 0 и b = 0; x - c x ——- в остальных случаях. c...
FUpp FUpp  31.12.2019 19:22
30 я делала №692 на сайте acmp.ru бинарные числа n=int( if n/2: print( yes ) else: print( no ) пишет,что неправильно.можете подсказать где ошибка?...
Mv0856 Mv0856  31.12.2019 18:43
Снаступающим. в турбо паскале решена, но выводит результат неверно, а именно не правильно высчитывает левую границу интервала. косяк вот тут writeln( y = ,y: 5: -2, s...

Популярные вопросы