#include<stdio.h>

int main() {

              printf("Chán ak chơi vs teo ik\n");

               printf("Bye");

              return 0;

}

`Code.1`

import java.util.Scanner;
public class Main{
         public static void main(String[] args) {
                 Scanner scanner = new Scanner(System.in);
                 int h, p, s;
                 int giay = scanner.nextInt();
                 h =  (giay/3600);
                 p =  ((giay - (h*3600))/60);
                 s =  giay - (h*3600 + p*60 );
                 System.out.println(giay + " giây = " + h + " giờ " +  p + " phút"+  s + " giây" ) ;

    }
}

`Code.2`

uses
  CRT, Graph, SysUtils, DOS, Math;
type
  TOrientation = (oPortrait, oLandscape);
  TPoint = record
    x, y : integer;
  
  end;
  TAngle = record
    a : float;
    r : integer;
  end;
var
  o : TOrientation;
  c : TPoint;
  a : TAngle;
function color(r, g, b : byte) : integer;
var
  cs : android_graphics_Color;
  c : integer;
begin
  c := cs.rgb(r, g, b);
  color := c;
end;
function point(c : TPoint; a : TAngle) : TPoint;
var
  r : TPoint;
begin
  r.x := round(c.x + a.r * sin(degToRad(a.a)));
  r.y := round(c.y + a.r * cos(degToRad(a.a)));
  point := r;
end;
function hand(c : TPoint; a : TAngle) : TPoint;
var
  p : TPoint;
begin
  a.a := -a.a - 180; 
  p := point(c, a);
  hand := p;
end;
procedure drawText;
var
  t : string = 'la gi vay moi nguoi';
  h, n, s, z, w : Word;
  j, m, d, e : string;
  yr, mo, dy, wd : Word;
begin
  setTextStyle(defaultFont, horizDir, 3);
  setTextJustify(leftText, topText);
  setColor(15);
  w := textWidth(t) div 2;
  if o = oPortrait then
    outTextXY(c.x - w, c.y - a.r - 50, t)
  else
    outTextXY(c.x - a.r - w * 2 - 50, c.y, t);
  getTime(h, n, s, z);
  j := intToStr(h);
  if length(j) = 1 then j := '0' + j;
  m := intToStr(n);
  if length(m) = 1 then m := '0' + m;
  d := intToStr(s);
  if length(d) = 1 then d := '0' + d;
  e := intToStr(z);
  if length(e) = 1 then e := '0' + e;
  t := j + ':' + m + ':' + d + '.' + e;
  w := textWidth(t) div 2;
  if o = oPortrait then
    outTextXY(c.x - w, c.y + a.r + 80, t)
  else
    outTextXY(c.x + a.r + 50, c.y, t);
  getDate(yr, mo, dy, wd);
end;
procedure handHour(h, n : integer);
var
  p : TPoint;
  r : TAngle;
begin
  if h > 11 then h := h - 12;
  r := a;
  r.a := (h + n / 60) * 30;
  r.r := r.r div 2 - 12;
  p := hand(c, r);
  // hand
  setColor(lightBlue);
  setLineStyle(solidLn, 0, 24);
  setFillStyle(solidFill, lightBlue);
  line(c.x, c.y, p.x, p.y);
  // rounded tip
  setLineStyle(solidLn, 0, 1);
  //pieSlice(p.x,p.y,0,360,11);
end;
procedure handMinute(n, s : integer);
var
  p : TPoint;
  r : TAngle;
begin
  r := a;
  r.a := (n + (s / 60)) * 6;
  r.r := r.r - 50;
  p := hand(c, r);
  // hand
  setColor(lightGreen);
  setLineStyle(solidLn, 0, 12);
  setFillStyle(solidFill, lightGreen);
  line(c.x, c.y, p.x, p.y);
  setLineStyle(solidLn, 0, 1);
end;
procedure handSecond(s, z : integer);
var
  p : TPoint;
  r : TAngle;
begin
  r := a;
  r.a := (s + (z / 100)) * 6;
  setColor(red);
  setFillStyle(solidFill, red);
  r.r := a.r - 20;
  p := hand(c, r);
  setLin