Var a,b: Integer;
begin
writeln('Введите a и b');
readln(a,b);
writeln('S=a*b=',a*b);
writeln('P=2*(a+b)=',2*(a+b));
end.
Program n1;
var a,b: real;
begin
readln(a,b);
writeln('S=',a*b);
write('P=',(a+b)*2);
end.
Джостик
Графопосторитель
Принтер
Блок питания(Не точно)
Колонки
Карта расширения
End
Матричный принтер(Не точно)
Вроде так должно быть..
26*10*10 - 26 = 2574
пояснение:
26*10*10 - количество вариантов без условия "одновременно не равных 5)
тк на первом месте может стоять любая из 26 букв, на втором любая из 10 цифр, на третьем аналогично
далее вычитаем 26 вариантов: каждый вариант соответствует одной из 26 букв, когда две цифры равны 5
Анимация процесса копирования или архивации
_____________________________________