Vara,b,z,x:integer;
begin
writeln('Введите первое число');
readln(a);
writeln('Введите второе число');
readln(b);
writeln('Введите третье число равное первому');
readln(z);
a:=1;
while a<=z do
begin
x:=x+b;
a:=a+1;
end;
writeln('произведение равно = ',x)
<span> end.</span>
Program n1;
var a: integer;
begin
write('введите натуральное число: ');
readln(a);
writeln('последня цифра: ',a mod 10);
end.
48•64=3072 всего символов
3072•8=24576 бит
24576÷8000=3.072 кб
<span>Информатика она везде. Например обычный диск на котором хранится информация. Обычная бумага тоже имеет роль к информатики и в древности это были наскальные рисунки. Все это информация, а информатика как раз и наука об информации!</span>