В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
1234567890640
1234567890640
25.11.2022 20:42 •  Информатика

Дана таблица рабочего графика сотрудника казах телеком вычислите используя формулу когда он работал больше 8 часо


Дана таблица рабочего графика сотрудника казах телеком вычислите используя формулу когда он работал

Показать ответ
Ответ:
alenapolyakova5
alenapolyakova5
06.01.2023 17:19

uses crt;
var
a:array[1..7,1..10] of integer;
b,i,j:integer;
begin
clrscr;
randomize();

//заполнение массива случайными числами

for i:=1 to 7 do
for j:=1 to 10 do
begin
a[i,j]:=random(10);
end;

//вывод массива

for i:=1 to 7 do
begin
for j:=1 to 10 do
write(a[i,j]:3,' ');
writeln();
writeln();
end;

//удаляем строку 6 и меняем 5 и 2 строки местами

for j:=1 to 10 do
begin
a[6,j]:=a[7,j];
a[7,j]:=0;
b:=a[5,j];
a[5,j]:=a[2,j];
a[2,j]:=b;
end;
writeln('Отредактированный массив');
//выводим отредактированный массив
for i:=1 to 6 do
begin
for j:=1 to 10 do
write(a[i,j]:3,' ');
writeln();
writeln();
end;
readln();
end.

0,0(0 оценок)
Ответ:
kseniarevda7
kseniarevda7
04.06.2021 11:06

#include <math.h>

#include <cstdlib>
#include <iostream>

 

using namespace std;

 

 

 

int main()

{

 float x1,x2,x3,y1,y2,y3;

 cout<<"введите кординаты первой точки"<<endl;

 cin>>x1;

 cin>>y1;

 cout<<"введите кординаты второй точки"<<endl;

 cin>>x2;

 cin>>y2;

 cout<<"введите кординаты третьей точки"<<endl;

 cin>>x3;

 cin>>y3;

 float ax=x1-x2,ay=y1-y2,bx=x2-x3,by=y2-y3,cx=x3-x1,cy=y3-y1;

 float a=sqrt(ax*ax+ay*ay);

 float b=sqrt(bx*bx+by*by);

 float c=sqrt(cx*cx+cy*cy);

 float S,P,p;

 P=a+b+c;

 p=P/2;

 S=sqrt(p*(p-a)*(p-b)*(p-c));

 cout<<"Площадь равна "<<S<<" Периметр равен "<<P<<endl;

 system("PAUSE");

 return 0 ;

}

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