Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
practica 2 ejercicio 6
//fpc 3.0.4 program HelloWorld; var car:char; cant:integer; begin car:= ' '; while car <> '.' do begin read(car); if (car = 'a') then begin read(car); if (car = 'e') then cant:= cant+1; end else if car = 'e' then begin read(car); if car = 'a' then cant:=cant+1; end; end; writeln('la cant de "ea" y de "ae" son ', cant); end.
run
|
edit
|
history
|
help
1
1 4 6
yghgh
Mengubah desimal ke biner
practica 7 ejercicio 1
6
Letícia
janja - naloga 1 - 25.1.2012
[DE/GER] Caesar Chiffre (Entschlüsseln)
считалочка05
Kotak_Adit