Давай, присылай картинку или текст, с радостью помогу❤️
Если x вводится с клавы:
var x:integer;
begin
readln(x);
writeln( 4*sqr(x)+2*(sqr(x)+1));
<span>End.
Если нет, то
</span>
begin
writeln( 4*sqr(3)+2*(sqr(3)+1));
<span>End.</span>
1. Переменные n1,n2,n3 — для цифр числа
2. Переменная number — для числа
3. Переменная res — для True или False
var
number, n1, n2, n3 : integer; // объявляем
res : boolean; // переменные
begin
write('Введите трехзначное число : ');
readln(number); //
просим пользователя ввести число
readln; // чтобы программа не закрывалась end<span>.</span>
1,5 Мбайт = 1,5*1024 Кбайт = 1,5*1024*1024 байт = 1,5*1024*1024*8 бит = 12 582 912 бит
1)факты и правила;
2)факты:2,3,5;
правила:1,4,6