Синквейн на тему графики текстового редактора

скор передачи=объём файла/время,отсюда  объём файла =скорость*время,т.е. 512000 * 16=8192000 бит,затем преводим все в кбайты: 8192000/8/1024=1000 кбайт

ну в метро, или если ты турист то картой, не?

program w7w7;

var a: real;

begin

readln (a);

if a< 0 then writeln ('otritsatelnoe chislo');

if a> 0 then  writeln ('pologitelnoe chislo');

end.

var

a: integer;

begin

readln(a);

writeln(a*(a div 10 + (a mod 10)*10));

end.