Выход: монитор, принтер, колонки
вход: клавиатура, мышь, сканер, диски разные, микрофон
Var a, b, c: integer;
begin
readln (a, b, c);
writeln('Сумма: ' , a+b+c);
write('Произведение: ', a*b*c);
end.
//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
begin
var a:=ReadInteger;
Println(a>0?a*a:a*a*a*a);
end.
Получится текст
"zDRAWSTWUJ$ DOROGOJ sA[A!" если кодировать в том же <span>KOI8-R</span>
делалось вручную. цените)
Ну я думаю иконка, но честно говоря вопрос странный