Есть ответ 👍

Лб- 70 разработайте алгоритм для вычисления площади треугольника: s = 1/2ah, где а – длина основания треугольника, h – его высота. вб- 71 разработайте схему алгоритма, который проверяет, не превосходит ли сумма двух действительных чисел а и в числа 100. если не превосходит, установить значение флага f=0, иначе установить значение флага f=1. вывести значение f. ца-10 разработайте схему алгоритма для вычисления суммы s первых n целых чисел. предусмотрите ввод значения n с клавиатуры. текущее значение целого числа имеет имя i (i = 1, 2, n).

239
252
Посмотреть ответы 1

Ответы на вопрос:


Var    i,sum,col: integer;   begin      for i: =-30 to 30 do      begin            if i mod 3 = 0              then                  begin                      inc(col);                       inc(sum,i);                   end;               end;     write(sum,' ',col);   end.

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