Mashoo4rik
23.04.2020 06:14

в Знание и понимание 3 и к 3 есть таблица 25, и применение

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
didlok
09.10.2021 18:19

#include <iostream>

using namespace std;

int main(int argc, char** argv)

{

int a,b,s,p;

cout<<"Input a: ";

cin>>a;

cout<<"Input b: ";

cin>>b;

p = (a+b)*2;  

s= a*b;

cout<<"Perimetr: "<<p<<"\nPloschad: "<<s<<endl;

}

Диагональ не знаю как.

2. #include <iostream>

using namespace std;

int main(int argc, char** argv)

{

int a,b,c;

cout<<"Input a: ";

cin>>a;

cout<<"Input b: ";

cin>>b;

cout<<"Input c: ";

cin>>c;

if(a==b or a==c)

{

 cout<<"Yes!"<<endl;

}

else if(b==a or b==c)

{

 cout<<"Yes!"<<endl;

}

else if(c==a or c==b)

{

 cout<<"Yes!"<<endl;

}

else

{

 cout<<"Oops!"<<endl;

}

}

3. #include <iostream>

using namespace std;

int main(int argc, char** argv)

{

setlocale(LC_ALL, "Russian");

int a;

cout<<"Input a: ";

cin>>a;

switch(a)

{

 case 1:

 case 2:

 case 3:

  cout<<"Íèçêèé!"<<endl;

  break;

 case 4:

 case 5:

 case 6:

  cout<<"Ñðåäíèé!"<<endl;

  break;

 case 7:

 case 8:

 case 9:

  cout<<"Äîñòàòî÷íûé!"<<endl;

  break;

 case 10:

 case 11:

 case 12:

  cout<<"Âûñîêèé!"<<endl;

  break;

 default:

  cout<<"Error!"<<endl;

  break;

}

}

4. #include <iostream>

using namespace std;

int main(int argc, char** argv)

{

int a, a1, a2, a3, a4, a5, a6;

cout<<"Input a: ";

cin>>a;

a1=a/1000;

a2=a/100%10;

a3=a%100/10;

a4=a%10;

a5=a1;

a6=a3;

if(a5>a1 && a6>a3)

{

 cout<<"Number more"<<endl;

}

}

Вроде так

Объяснение:

0,0(0 оценок)
Ответ:
goddessshi
01.03.2021 15:44

 

 

Ну так во первых  обяъвление процедуры должно быть

procedure InputMas1(var mas1:Tmas );

 

 

 во вторых ты забыл  end;  т.е 

 

 

begin
for i:=1 to 10 do
      begin
           mas1[i]:=random(n);
           Write(mas1[i]:3);
     end;

 end; {забытый end}

 

 

в третьих ты  не написал основную прграмму т.е забыл begin и не вызвал процедуру 

InputMas1

 

 

begin

     clrscr;
     InputMas1(mas1);

     readkey;
end. 

 

 

 Итого прога должна выглядеть примерно так

 

 

program Massiv
Uses Crt;
const n=10;
type TMas=array[1..n] of integer;
var mas1:TMas;


procedure InputMas1(var mas1:TMas);
var i:integer;

begin
     for i:=1 to 10 do
        begin
        mas1[i]:=random(n);
        Write(mas1[i]:3);
       end;
end;
{Основная прога}
begin
clrscr;
InputMas1(mas1);
readkey;
end.

 

 

 

 

Держи ! Пользуйся на здоровье и будь внимательнее.

 

 

 

 

 

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота