Var x,y,U, S:integer;
begin
readln (x,y);
S:=x+y;
if (S>100) then U:=S/2;
if (S<100) then U:=S; (зависит от условия. по-моему, в задании неправильно поставлено второе условие.)*
writeln (U);
end.
*если в условии написано
"в противном случае умножить на два, то
if (S<100) then U:=S*2;
а если оставить число неизменным, то
if (S<100) then U:=S;
1. Это разъемы которые служат для подключения чего либо к самому компьютеру.2. Слот расширения - Разъём на материнской плате соединенный с системной шиной, который позволяет подключать к нему дополнительные платы (карты расширения).3. Принцип открытой архитектуры заключается в следующем: * Регламентируются и стандартизируются только описание принципа действия компьютера и его конфигурация (определённая совокупность аппаратных средств и соединений между ними).4. Сформировать представление о структурной схеме компьютера;
Объяснить назначение и характеристики системной шины;
Объяснить назначение портов;
Определить некоторые важные принципы работы современного компьютера.
Опорные понятия:
Аппаратное обеспечение компьютера;
Назначение и характеристики отдельных устройств компьютера;
Разрядность;
Производительность.
Новые понятия:
Структурная схема компьютера;
Системная шина;
Системный блок;
Системная плата;
Параллельный порт;
Последовательный порт;
Принцип программного управления;
Принцип открытой архитектуры.
a - двухзначное число, b - первая цифра двухзначного числа
b: = a div 10;
if (b mod 2 = 0) then writeln ('Цифра чётная');
if (b mod 2 = 1) then writeln ('Цифра нечётная');