1.
var arr: array[1..6] of integer;
var i, summ: integer;
begin
summ:= 0;
for i:=1 to 6 do
begin
readln(arr[i]);
end;
for i:=1 to 6 do
begin
if arr[i]>4 then
summ := summ+arr[i];
end;
writeln(summ);
end.
var arr: array[1..7] of integer;
var i, mult: integer;
begin
mult:= 1;
for i:=1 to 7 do
begin
readln(arr[i]);
end;
for i:=1 to 7 do
begin
if arr[i]>0 then
mult := mult*arr[i];
end;
writeln(mult);
end.
Краткий гайд
i - переменная-счётчикarr - массив, с которым производятся операцииsumm - (в первом задании - переменная, отвечает за сумму элементовmult - (во второй части) отвечает за произведение
#include <iostream>
#include <cstdlib>
#include <ctime>
using namespace std;
int main()
{
srand(time(NULL));
int n;
cin>>n;
int *arr = new int;
for(int i = 0;i<n;i++){
arr[i] = 0+rand()%100;
}
int summ = 0;
int count = 0;
for(int i = 0;i<n;i++){
if(arr[i]<78){
summ+=arr[i];
count ++;
}
}
double result = summ / count;
cout<<result;
return 0;
}
Краткий гайд:
n - переменная, отвечает за размер массива*arr - динамический массив, динамический, потому что нужно задавать его размер.
begin
writeln('Цисло тигров');
Read(a);
b:=30;
if a<=b then
writeln('Норма');
if a>b then begin writeln('Угроза');
writeln('Угроза исчезновения'); end;
read(c);
if c='Отправить' then
writeln('Вы выбрали отправить');
if c='Не отправить' then
writeln('Вы выбрали не отправить');
end.
По сути должна выглядеть так.