Модуль, Квадрат числа, Корень из числа, Случайное число
Program n1;
var n,i,k: integer;
sum,a: real;
begin
sum:=0;
k:=0;
write('n=');
readln(n);
for i:=1 to n do
begin
readln(a);
if a<0 then begin
sum:=sum+a;
k:=k+1;
end;
end;
writeln(sum/k);
end.
//Я так понял, что нужно писать программу на языке С (так как была указана стандартная библиотека stdio.h данного языка) с использованием операторов if и else
#include <stdio.h>
#include <locale.h>
int main()
{
setlocale(LC_ALL, "Rus");
int num;
printf("Введите номер времени года: ");
scanf("%d", &num);
if (num == 1)
printf("\nЗима:\n1) Декабрь\n2) Январь\n3) Февраль\n");
else if (num == 2)
printf("\nВесна:\n1) Март\n2) Апрель\n3) Май\n");
else if (num == 3)
printf("\nЛето:\n1) Июнь\n2) Июль\n3) Август\n");
else if (num == 4)
printf("\nОсень:\n1) Сентябрь\n2) Октябрь\n3) Ноябрь\n");
else
printf("\nВремени года с данным номером не обнаружено!\n");
return 0;
}
Var
text : string;
i : integer;
begin
write('Введите текст: ');
readln(text);
write('Результат: ');
for i := length(text) downto 1 do
write(text[i]);
<span>end. </span>