Add Pascal learning files

This commit is contained in:
2025-11-20 21:18:32 +02:00
parent 1ce193cc0d
commit 258f24570a
37 changed files with 587 additions and 0 deletions

View File

@@ -0,0 +1,12 @@
program cha;
var c,x,y,z:char; //char - типо integer только кроме цифр есть буквы и точки
begin
z:= ('z'); // присвоил z значение "z"
WriteLn('введи x');
ReadLn(x); //читаем x
WriteLn(x+z); // складываем символы
WriteLn('4 буквы без пробелa.');
ReadLn(c,x,y,z);
WriteLn(c+x+y+z); // таким образом можно составить слово.
end.