Uts Alpro 2019.docx

  • Uploaded by: ReznandiNandi
  • 0
  • 0
  • October 2019
  • PDF

This document was uploaded by user and they confirmed that they have the permission to share it. If you are author or own the copyright of this book, please report to us by using this DMCA report form. Report DMCA


Overview

Download & View Uts Alpro 2019.docx as PDF for free.

More details

  • Words: 190
  • Pages: 1
Ujian Tengah Semester Algoritma Pemograman 1.

Perbaikkilah program berikut agar ia dapat di kompilasikan pada kompiler pascal, serta tuliskan output program tersebut setelah di perbaikki ! Program 1soal Uses crt ; Var Nama : string: Begin Clrscr Writeln (‘Silahkan ketik kata Matematika = ‘); Readln (Nama); A := copy (Name,1:3); insert (‘A MATA,A,4); writeln (‘’,A); delete (A,3,7); insert (‘KA’,A,3); writeln (‘’,A); end

2.

A. Tuliskan output dari program berikut ini; Program Minuman; Uses crt; Var I : longint; Begin Clrscr; Writeln ('TABEL HARGA MINUMAN'); Writeln ('Jumlah Teh Botol Teh Kotak Susu'); Writeln ('------------------------------------------------------'); for i := 10 downto 1 do begin writeln (i:5,i * 2150:10,i * 3250:10,i * 3450:10); writeln ('------------------------------------------------------'); end; readln; end.

B. Buatlah program serupa dengan menggunakan struktur perulangan while dan repeat until! 3.

Buatlah Program untuk menampilkan beberapa bintang dari n bilangan pertama yang menghasilkan output seperti contoh berikut;

4.

Buatlah suatu program untuk mengkonversi suhu dari celcius ke reamur dan Fahrenheit dengan pilihan menu yang terstruktur dan memberikan pesan jika pilihan yang di buat diluar pilihan yang tersedia! <<<<<>>>>> 1. Konversi Suhu Celcius Ke Reamur 2. Konversi Suhu Celcius Ke Fahrenheit 3. Keluar

Related Documents

Uts Alpro 2019
October 2019 9
Uts Alpro 2019.docx
October 2019 4
Alpro
April 2020 21
Alpro 1.3
June 2020 20
Alpro 1.4
June 2020 21
Alpro Ifb
December 2019 19

More Documents from "M Fachrurrozi"

Uts Alpro 2019
October 2019 9
Uts Alpro 2019.docx
October 2019 4