Мысалдары 2. Берілген кестені MS Word-қа енгізіңдер.
Ақпараттың қасиеттері Анықтамасы
Өзектілігі
Анықтылығы
Объективтілігі
Қолжетімдігі
Толықтығы
Дәлдігі
Нақтылығы
Құндылығы​

var

n: integer;

begin

readln(n);

if (n mod 10)=(n div 100) then

writeln('палиндром')

else

writeln('не палиндром');

end.

койка, стройка, трест, рой, репа, тройка, река, серп,строка.

картинка должна быть в папке с программой и быть в формате bmp

uses graphabc;

var n: string; b: picture; s: integer;

begin writeln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.

подвести курсор справа от удаляемого символа

клацнуть бэкспейс

радоваться