Есть ответ 👍


1. вычислить длину окружности по заданному радиусу r
2. вычислить периметр и площадь параллелограмма, если известны
начало
стороны и высота параллелограмма.
3. определите значение переменной b после выполнения фрагмента
алгоритма:
порядок действий соответствует правилам арифметики.
4. даны два числа а и б. определить среднее арифметическое двух чисел,
если а положительное и частное (а/b) в противном случае. решение
представить в виде блок-схемы.
5. вычислить значение функции:
y= (х + 12, если х< 2;
2 *х, если 2 -5, если х> 6


220
227
Посмотреть ответы 1

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


program count;

uses crt;

var i,n: byte;

begin

      n: =0;

      for i: =1 to 100 do

            if (i mod 5)=0 then n: =n+1;

    writeln('количество чисел кратных 5: ',n);

    readkey;  

end. 

 

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