Var s,k: integer; Begin s := 132; for k := -2 downto 5 do s := s-7; writeln(s); End.

Популярно: Информатика

• 

  Аркаша2281337

  25.10.2021 03:34
  Cd обьёмом 700мб. весит 15г.сколько весит набор дисков,необходимый...
• 

  tvojrulet16

  30.08.2020 17:59
  Надо написать в семеричной системы счисление свой день , месяц...
• 

  smirnovar2016

  20.02.2022 08:31
  Двумерный массив 5x5 заполняется данными кроме последних элементов...
• 

  милан64488

  09.08.2022 18:07
  6 класс. 3 четверть. СОР * Обязательно Укажите ваш класс * 6А...
• 

  Помогитемне11111119

  22.10.2022 03:41
  Составить программу которая записывает массив из 10 по формулеi:...
• 

  mitaikooo

  10.02.2023 10:57
  По заданному радиусу и углу найти s сектора и дугу. программа...
• 

  eduard7286

  06.11.2022 11:33
  4. 1/2 − 1 = 1/3( + 3/4 ) = 5. 3 − 1/4 − 2 + 3/3 = 1 = 6. 5/6...
• 

  keks661

  12.05.2023 05:25
  1. Найдите строки, в которых вы- ражена тоска по родному языку....
• 

  лиза2695

  15.01.2022 01:25
  На рисунку зображено прямокутний трикутник ABC, у якого кутACB=90...
• 

  aamelkumova933

  13.11.2020 18:55
  Определите общее сопротивление и напряжение если сила тока в...