1. Створіть клас, який називається SportResults, який не має вмісту, і виведіть його на екран. Потім створіть екземпляр diving цього класу і також виведіть його. Чи збігаються виведені значення?
2. У клас SportResults додайте змінну points зі значенням 25 і виведіть на екран значення атрибуту points для екземпляру diving. А потім надайте значення 150 для points. Знову виведіть на екран значення атрибуту points для екземпляру diving. Чи потрібно було створювати новий екземпляр класу, щоб зробити повторне виведення?
3. Створіть клас, який називається Element, з методом init, що має атрибути екземпляру name, symbol і number. Створіть екземпляр цього класу el зі значеннями 'Silicium', 'Si' і 14 і виведіть на екран значення його атрибутів.
4. Створіть словник з наступними ключами і значеннями: 'name': 'Argentum', 'symbol': 'Ag', 'number': 47. Далі створіть екземпляр з ім’ям argentum класу Element за до цього словника і виведіть значення усіх атрибутів.

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

kceniaart18

12.02.2020 13:19

Как называется редактор для видеозаписи, качественной обработки снятой видеозаписи, записи аудио, хранения?...

простониккакойтотам

31.05.2023 02:19

После очередного этапа чемпионата мира по кольцевым автогонкам на автомобилях с открытыми колесами Формула-А гонщики собрались вместе в кафе, чтобы обсудить полученные...

qofepvcqj

28.12.2020 06:29

Скратким ответом. перекодировать с письменного языка на устный имя юля....

krasotkak31

08.03.2020 03:14

Уставку росте один аркуш лілії. кожен день число листя подвоюється. на який день ставок буде покритий листям лілії наполовину, якщо відомо, що він буде повністю покритий...

Soffik0611

25.04.2021 23:17

Найти,какое число обозначает каждая буква,если известно,что: 1.а равно сумме з и к. 2. к в з раза меньше л. 3.л равно сумме м и о. 4. m равно разности н и р. 5. н второе...

yanakrl1

25.04.2021 23:17

Разработать алгоритмы и по ним составить блок-схемы. a)вычисления функции y=(10x+x^2-1)(10x+1) b)найти площадь основной пирамиды s, если известна высота h и объем пирамиды...

Zizosia

25.04.2021 23:17

Из каких команд состовляется линейный вычислительный алгоритм?...

масяня114

08.05.2020 06:37

Чиполлино построил домик и хочет уложить пол на кухне плинткой. чиполлино хочет купить плитку максимально возможного размера. сколько потребуется плиток для укладки пола...

mynameisNastia

27.01.2020 12:29

Код ошибки 0x8004240f. собрал пк купил windows 10 pro, в официальном магазине. но при выборе пустого жестоко диска для установки windows пишет вот эту ошибку, ....

karinasing

08.05.2022 21:20

Установите соответствие между числами, представленными в двоичной, восьмеричной, шестнадцатеричной системами счисления и их представлением в десятичной системе счисления....

Ответ:

Давидычь

26.03.2020 23:48

1. Вот так сейчас решают подобные задачи:

// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
Writeln(Range(1,100).Select(i->sin(i)*cos(i)).Where(x->x<>0).Average)
end.

Тестовое решение:
-0.00136006072493969

2. А вот так учат писать это же школьные учителя:

// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
var
m:array[1..100] of real;
i,k:integer;
s:real;

begin
s:=0;
k:=0;
for i:=1 to 100 do begin
    m[i]:=sin(i)*cos(i);
    if m[i]<>0 then begin
      s:=s+m[i];
      k:=k+1
      end
    end;
Writeln(s/k)
end.

Тестовое решение:
-0.00136006072493969

0,0(0 оценок)

Ответ:

glebsemenov86

22.01.2022 09:02

Если элементы массива идут по возрастанию, то вот так

program wstawka;
uses crt;
const min=1;
max=20;
type zona=min..max;
massiw=array[zona] of integer;
var mas:massiw;
i,j:zona;
a,N,M:integer;
T:boolean;
BEGIN randomize;
clrscr; N:=random(20);
writeln('4ucJlo N = ',N);
M:=random(20); Writeln('4ucJlo M = ',M);
for i:=min to max-2 do
begin
mas[i+1]:=mas[i]+random(5);
write(mas[i],' ');
end;
for i:=min to max-2 do
if (mas[i]>N) and (t=false) then
begin
t:=true;
a:=mas[i];
mas[i]:=N;
for j:=i+1 to max do
begin
N:=mas[j];
mas[j]:=a;
a:=N;
end;
end;
for i:=min to max-1 do
if (mas[i]>M) and (t=true) then
begin
t:=false;
a:=mas[i];
mas[i]:=M;
for j:=i+1 to max do
begin
M:=mas[j];
mas[j]:=a;
a:=M;
end;
end;
writeln;
for i:=min to max do
write(mas[i],' ');
readkey;
END.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку