1 + 1 + 1 + 1 = 4
Если я не косоглазый. Условие лучше в следующий раз записывать в логическом порядке
Ответ:
program h;
uses crt;
var a, b, c: Integer;
begin
ReadLn(a, b, c);
if a+b+c>=200 then WriteLn('Выходит')
else WriteLn('Не выходит');
end.
Объяснение:
Первая строка: "h" можно заменить - это название программы
var - объявление переменных, Integer - целочисленные
readln - ввод трёх чисел
writeln - вывод ответа
В году 12 месяцев значит N=12 2^i=12 i=4 Ответ 4 бита
Объём памяти, занимаемый текстом, высчитывается по формуле:
V (или I, смотря как принято у вас в школе) = k · i
где k - количество символов (в тексте) или пикселей (в рисунке), а i - количество бит, которым кодируется один символ или пиксель.
i дано: 16 бит.
k находим через перемножение количества страниц, строк и символов.
V = 10 · 32 · 64 · 16 = 327680 бит = 40960 байт = 40 Кбайт
Program exmpl;
var a,b,c: integer;
begin
write('Введите длины трех сторон треугольника: ');
read(A, B, C);
write('Треугольник со сторонами ', a, b:2, c:2);
if ((a + b) > c) and ((b + c) > a) and ((a + c) > b)
then write(' существует.')
else write(' не существует.');
<span>end.</span>