<span>8 единиц, займет 8 бит или 1 байт
</span>
В мире новых технологий
Информатика предмет
Жизненно необходимый.
В нем для нас секретов нет.
===== PascalABC.NET =====
function sogl(c: char) :=
not (c.ToUpper in ('АЕЁИОУЫЭЮЯ'));
// проверка функции
begin
var s := 'ТестируемРусскийАлфавит';
foreach var c in s do
Print(sogl(c));
end.
На самом деле все это будет правильно работать лишь если функции давать исключительно русские буквы.
Ответ:
3^2-(7-6)=8
Объяснение:
2 Степень тройки это как бы 3*3, так что это не совсем подходит по условию, но по другому я не смог придумать.
Program program1;
var
a, b, c, p: real;
begin
write('Введите длины сторон треугольника: ');
readln(a, b, c);
p := a + b + c;
writeln('Периметр треугольника со сторонами ', a, ', ', b, ' и ', c, ' равен ', p);
end.