Var a,b,s:integer;
begin
readln(a,b);
s:=(a+b)*2;
writeln('s = ',s);
end.
Пример:
12 75
<span>s = 174</span>
Во 2 задание где принт изображён там команда напечатать если к компьютеру подключён принтер то что есть в программе можно напечатать там в 3 задании уходшение зрения надо отметить
Сумма элементов, равных нулю, в любом массиве будет равна нулю. Сколько нулей ни складывай - в результате будет ноль. И для этого не надо писать никаких программ - достаточно арифметики из начальной школы.
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=MatrRandom(5,5,-9,9);
a.Println(3); Writeln(15*'-');
Writeln('Сумма нулей: ',a.ElementsByRow.Where(t->t=0).Sum)
end.
Крестик например это 1 бит
следовательно всего используется 5 бит на одно слово.
2^5=64 слов
Ответ: максимальное количество слов в данном алфавите 64.