Pascal:
program z1;
var i, k, n, ch:integer;
begin
n:=0;
ch:=0;
for i:=1 to 15 do
begin
writeln('Input number:');
readln(k);
if(k mod 2=0) then
ch:=ch+1
else
n:=n+1;
end;
writeln('Нечетных было ', n);
writeln('Четных было ', ch);
end.
1. Клавиатура
2. Процессор
3. Монитор
4. Память
5. Мышь
6. Джойстик
7. Винчестер
8. Принтер
Слово: Компьютер
<u>// PascalABC.NET 3.3, сборка 1627 от 27.01.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ReadSeqIntegerWhile(t->t<>0).Where(t->t.Between(10,99)).ToArray;
if a.Length=0 then Writeln('NO')
else Writeln(a.Average)
end.
<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>
1)От того, какая функция (тема) задана
2)В мышке содержится лазер который при движение мышки он отображает тоже самое только на мониторе .
3)окно
4)
1. заголовок окна - где пишется название программы или название создаваемого документа плюс кнопки "закрыть", "свернуть", "развернуть"
2. строка меню - строка, через которую управляют программой
3. панель инструментов - панель быстрого доступа к элементам управления программой
4. рабочая область, в которой работает пользователь
<span>5. строка состояния - отображает текущий процесс или состояние
5)</span>программно осуществляется.А<span> меню в свою очередь,элемент управления,меню бывает контекстным.
6)</span>Выглядят как и доступные, только текст написан серым.
