Postingan

Menampilkan postingan dari Januari, 2020

Aidila uniku

Gambar
Aidila ida ne uniku maluk sira hare didiak nia fuan ne

Hau nia foto

Gambar
Foto ho alin momentu sei kiik Alin maske kiik mas rai foto too nia bot

ETI Maliana Orentasaun

Gambar
Escola Tecnica Informatica Maliana halao Orentasaun hahu loron Quinta feira too Sabadu taka ho Api Unggu.

Escola Tecnica Informatica Maliana iha nia Dormitorio rasik, ba estudante foun ETI Maliana hakarak hela Dormitorio bele mai kontaktu Sr Dir iha nia fatin

Gambar

Escola Tecnica Informatika Maliana kontinua simu Estidantes foun

Gambar
Nudar   responsabilidades Laboratorium tenke kalma

program ramalan zodiak

Gambar
program RAMALAN_ZODIAK; uses CRT; Var x1,y1,x2,y2                  : byte;     Nama, JK, Pend, Jawab, Jodoh : string;     Tahun                        : integer;     Tanggal, Bulan, Warna, umur  : longint; Const TS=2014; label Home; Procedure Frame;     Begin       Clrscr;        //Window 1       textbackground(5);       window(5,3,70,40);       clrscr;       //Window 2       textbackground(1);       window(4-2,4-2,70-2,40-2);       clrscr;       //Wondow 3       textbackground(7);       window(4,3,70-4,40-3);       clrscr;     End; BEGIN    Frame;    Home:    clrscr;    textcolor(0);    Writeln;    writeln('==============================================================');    textcolor(5);    writeln('       SELAMAT DATANG DI RAMALAN ZODIAK Mr.CikidAwwW..:D      ');    textcolor(0);    writeln('==============================================================');    writeln;    textcolor(4);    writeln('

program biodata

Gambar
Program biodata; Uses crt; var nama,tanggallahir,makes,mikes,hobi: string; Begin clrscr; Writeln('siapakah nama kamu?');readln(nama); Writeln('kapankah tanggal lahir kamu?');readln( tanggallahir); Writeln('apa makanan kesukaan kamu?');readln(makes); Writeln('apa minuman kesukaan kamu?');readln(mikes); Writeln('apa hobi kamu?');readln(hobi); clrscr; writeln ('nama saya adalah ', nama); writeln ('tanggal lahir saya adalah ', tanggallahir); writeln ('makanan kesukaan saya adalah ', makes); writeln ('minuman kesukaan saya adalah ', mikes); writeln ('hobi saya adalah ', hobi); Readln; End. program teste_if__simples_1; uses crt; var A,B,C :real begin writeln ('digite um valor para A:'); readln (A); writeln ('digite um valor para B:'); readln (B); writeln ('digite um valor para C:'); readn (C); if (A+B < C) then writeln ('A soma de A com B e menor

Nelson uaioli

Gambar
Husi Familia Atoy hakarak hato'o Boas festa do santu natal 25 e Tinan foun 2020 espera katak buat htu lao foun

Lidio Simaun

Gambar
Husi Atoy hakarak hatoo Boas festa do santu nalta 25 de /12/2019 kosok oab lori dame domin pas iha famila laran e Tinan foun 1/1/2020 espera katak buat htu lao foun