<span>class Bank<span>:
</span> def __init__(self,vklad)<span>:
</span> self.vklad = <span>vklad
</span> def information(self)<span>:
</span> if self.vklad < 5000<span>:
</span> print("Ви маєте спалити ",self.vklad*0.2,'$ в год')
elif self.vklad >= 5000 and self.vklad <15000<span>:
</span> print("Ви маєте спалити ",self.vklad*0.2,'$ в год')
else<span>:
</span> print("Ви маєте спалити ",self.vklad*0.2,'$ в год')
n = int(input("Введыть суму: "))
one_person = Bank(n)
one_person.information()
</span>
Program p1;
var
a, b, c, s: real;
begin
Writeln('Вычислите S поверхности параллелепипеда.');
Writeln('Введите исходные данные:');
Write('Длина(см)? '); Readln(a);
Write('Ширина(см)? '); Readln(b);
Write('Высота(см)? '); Readln(c);
s := 2 * (a * b + b * c + c * a);
Writeln('Площадь поверхности: ', s, ' кв.см.')
end.
<u>Тестовое решение:</u>
Вычислите S поверхности параллелепипеда.
Введите исходные данные:
Длина(см)? 9
Ширина(см)? 7.5
Высота(см)? 5
Площадь поверхности: 300 кв.см.
program p2;
var
ct,ck,s:real;
kt,kk:integer;
begin
Writeln('Вычисление стоимости покупки');
Writeln('Введите исходные данные:');
Write('Цена тетради(руб.)? '); Readln(ct);
Write('Количество тетрадей? '); Readln(kt);
Write('Цена карандашей(руб.)? '); Readln(ck);
Write('Количество карандашей? '); Readln(kk);
s:=ct*kt+ck*kk;
Writeln('Стоимость покупки: ',s:0:2,' руб.')
end.
<u>Тестовое решение:</u>
Вычисление стоимости покупки
Введите исходные данные:
Цена тетради(руб.)? 2.75
Количество тетрадей? 5
Цена карандашей(руб.)? 0.85
Количество карандашей? 2
Стоимость покупки: 15.45 руб.
Rain[i] - массив с количеством осадков в i-тый день, 0 - если их не было
var rain: array [1..10] of integer;
i, k:integer;
begin
k := 0;
for i := 1 to 10 do
if rain[i] = 0 then k := k+1;
if k = 5 then writeln('Да, без осадков было ровно 5 дней');
end.
Сначала 1, потом 3, потом 2