Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
08 ariketa
//fpc 3.0.0 program HelloWorld; var a:string; b:string; z1:integer; z2:integer; begin writeln('Idatzi bi izen'); readln(a); readln(b); z1:=length(a); z2:=length(b); if (z1>z2) then begin writeln(a,' luzeagoa da ',b,' baino'); end else if (z1=z2) then begin writeln(a,' eta ', b,' luzeera bera dute'); end else begin writeln(b,' luzeagoa da ',a,' baino'); end end.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
practica 11 ejercicio 4
practica 5 ejercicio 6
PrimoPerfecto
Урок 3 задача 1 (1484) повышенная сложность.
practica 8 ejercicio 1
Пузырькова сортировка
practica 3 ejercicio 3
test28
Matriz 9x9
НОД через функцию с возможностью вычисления для трёх и более чисел
Please log in to post a comment.