Program n1; var x: integer; begin writeln('Введите число'); readln(x); if (x mod 10 = 5) or (x mod 10 = -5) then writeln('Число оканчивается на 5') else writeln('Число не оканчивается на 5'); end.
program p2; var x, y, sum: integer; begin writeln('введите число'); readln(x); if ((x >= 10) and (x <= 99)) or ((x <= -10) and (x >= -99)) then writeln('является двузначным') else writeln('не является двузначным'); y := abs(x); sum := 0; while (y <> 0) do begin; sum := sum + (y mod 10); y := y div 10; end; if sum = 8 then writeln('сумма цифр равна 8') else writeln('сумма цифр не равна 8'); end.
Microsoft Word - это текстовый редактор от компании Microsoft. Программа обычно входит в пакет офисных программ Microsoft Office, но может поставляться и отдельно. Является платной и стоит просто бешеных денег для организаций (около 19000руб, т.к. продается только в составе пакета Microsoft Office Pro), и больших денег для домашних пользователей (около 4000р), но никого это не смущает, все используют пиратские версии. Программа позволяет редактировать тексты любой сложности, вставлять в документы картинки, таблицы и прочее нестандартное содержимое. Аналогом Microsoft Word является бесплатный Writer из пакета LibreOffice и OpenOffice, который позволяет делать всё то же самое, только бесплатно, хотя и немного сложнее местами. Microsoft Word официально работает только на компьютерах с ОС Microsoft Windows и Apple OS X, хотя возможен и его запуск на ОС семейства Linux через Wine, но корректная работа программы не гарантируется. Microsoft Word является самым распространенным текстовым редактором в мире.
PascalABC.Net
begin
var (v_1, v_2) := ReadInteger2;
Print(if v_1 > v_1 then 'Первый V_1' else 'Первый V_2');
end.