#include <iostream>
using namespace std;
int main()
{
int n;
cout << "Сколько Вам лет?";
cin >> n;
if(n % 10 == 1 && n != 11) {cout << "Вам " << n << " год"; return 0;}
if(n % 10 >= 2 && n % 10 <= 4) {cout << "Вам " << n << " года"; return 0;}
if(n % 10 == 0|| n == 11 || n % 10 >= 5 && n % 10 <= 9) {cout << "Вам " << n << " лет"; return 0;}
return 0;
}
Надеюсь что это нужно выполнить на паскале
4. var a: array[1..20] of integer;
p,i:integer;
begin
p:=1;
for i:=1 to 20 do
begin
a[i]:= random(20);
write(a[i]:3);
end;
writeln;
for i:=1 to 20 do
if a[i] mod 2 = 0 then p:=p*a[i];
writeln(p);
end.
5. var a: array[1..100] of integer;
sum,i:integer;
begin
for i:=1 to 100 do
begin
a[i]:= random(100);
write(a[i]:4);
end;
for i:=1 to 100 do
sum:=sum+a[i];
writeln;
writeln(sum);
end.
6. var a: array[1..20] of integer;
sum,i:integer;
begin
writeln('Исходный массив');
for i:=1 to 20 do
begin
a[i]:= random(20);
write(a[i]:3);
end;
for i:=1 to 20 do
if a[i]<10 then
a[i] :=0;
writeln;
writeln('Итоговый массив');
for i:=1 to 20 do
write(a[i]:3);
end.
"Если спрайт касается желтого цвета, то он должен сказать "Светит солнце!" или "Идёт дождь!"