Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
1 25 6
//fpc 3.0.4 Program NoName; Var a,b,n,a1,b1,s : integer; Begin readLn( a,b,n ); s:=n*(a*100+b); a1:=s div 100; b1:=s mod 100; WriteLn(a1, ' ',b1); end.
run
|
edit
|
history
|
help
0
s
6
pares entre a y b
zadacha10
09 Ariketa WHYLE
test28
1januar2018
NOT a String in Pascal
TimeDemo
Prova 1