Вместо "a := a * a" можно использовать "a := sqr(a)"
--------------------------------------------------------------------
var
a : integer;
begin
write('Введите число: '); //Вывод сообщения
readln(a); //Ввод числа
a := a * a; //Возведение в квадрат
writeln('Введенное число в квадрате = ', a); //Вывод результата
readln;
end.
Если просто, то нарисуй человечка, который говорит и моргает глазами.
Если нужно на любую тему, нарисуй Билла Шифра (на фото), как будто он двигает зрачком в глазу.
;-; БИЛЛА ШИФРА РИСОВАЛА САМА! ПРОВЕРЬТЕ ;-;
Считаем количество символом от кавычек до кавычек (их не считаем), включая пробелы между словами
Всего 27. Так как один символ равен 8 битам=одному байту то Ответ 27 байт (или 216 бит)