На логику, , четверо – миша, рома, антон, гриша – пошли на день рождения к егору. они знают, что егор собирает модели машинок, и у него в коллекции нет моделей машин мерседес, тойота, форд и шевроле. чтобы все подарки были разные, они заранее договорились о следующем : а ) если миша дарит модель мерседеса, то рома подарит модель тойоты ; б ) если антон подарит модель форда, то гриша подарит модель мерседеса ; в ) если миша подарит модель шевроле, то рома подарит модель мерседеса. известно, что миша не подарил модель тойоты, а рома не подарил модель шевроле. антон подарил или модель тойоты, или модель форда, а гриша подарил или модель шевроле, или модель мерседеса. определите, кто из подарил какую модель машины, если все договорённости были соблюдены. в ответе запишите первые буквы имён в порядке следования подаренных ими моделей : тойоты, шевроле, форда, мерседеса.

М-М * Р-ТА-Ф * Г-ММ-Ш * Р-М
М not(Т)  М,Ш,ФР not(Ш) Т,Ф,М
А v T v ФГ v Ш v М
Г-М А-Ф М-Ш Р-Т

ответ
Р М А Г

1)

var

 D: array[1..20] of integer;

 i, min: integer;

begin

min := 100; // минимальное значение

for i:=1 to 20 do

begin

  D[i] := random(100);

  if D[i] < min then

    min := D[i];

end;

write(min);

end.

2)

var

 B: array[1..30] of integer;

 i, sum, count: integer;

 srAr: real;

begin

 count := 0; // количество чисел больших среднего арифметического

 sum := 0; // сумма всех чисел массива

 for i := 1 to 30 do

 begin

   B[i]:= random(30) + 20;

   sum := sum + B[i];

 end;

 srAr := sum / 30; // среднее арифметическое

 

 for i := 1 to 30 do

   if B[i] > srAr then

     count := count + 1;

   

 write(count);

end.

#include <iostream>

using namespace std;

int main(){

setlocale(LC_ALL, "Russian");

cout<<"Введи свой возраст"<<endl;

int a;

cin>>a;

if (a<1||a>130){cout<<"Введено некорректное значение"; return 0;}

if (a%100==11||a%100==12||a%100==13||a%100==14){cout<<"Вам "<<a<<" лет"; return 0;}

if (a%10==1){cout<<"Вам "<<a<<" год"; return 0;}

if (a%10==2||a%10==3||a%10==4){cout<<"Вам "<<a<<" года"; return 0;}

cout<<"Вам "<<a<<" лет";

return 0;

}

Есть еще возможность проверки принадлежности введеной строки к числовому типу. Но, просматривая уровень ваших заданий, я пришел к выводу, что функции такого уровня будут не совсем желательны. Если все-же нужна - пишите.