Информатика- дисциплина, изучающая структуру и общие свойства научной информации, а также закономерности её создания, преобразования, передачи и использования в различных сферах человеческой деятельности.
текстовый редактор-самостоятельная программа или компонент программного комплекса , предназначенная для создания и изменения текстовых данных вообще и текстовых файлов в частности
графический редактор- программа, осуществляющая работу с графической информацией (Штриховыми и растровыми изображениями).информатика- это знание, которые мы получаем из различных источников. Текстовый редактор- это программа, вс которой мы можем форматировать, меня и удалять текст. Графический- мы можем редактирывать, форматировать графические объекты.
function Gcd(a,b: longint): longint; { Нахождение НОД } var i: longint; begin while b <> 0 do begin a := a mod b; i := b; b := a; a := i end; gcd := a end;
procedure ShortFraction(var m,n:longint); var k:longint; begin k:=Gcd(m,n); m:=m div k; n:=n div k end;
var a,b:longint; begin Write('Введите числитель и знаменатель дроби: '); Readln(a,b); ShortFraction(a,b); Writeln('Дробь после сокращения равна ',a,'/',b) end.
Тестовое решение: Введите числитель и знаменатель дроби: 25 15 Дробь после сокращения равна 5/3
var c,o:real;
begin
writeln('Введите число С: ');
read(c);
writeln('Введите число O: ');
read(o);
if c=o then writeln('Числа равны') else
if c>o then writeln('Наибольшее число: ',c)
else writeln('Наибольшее число: ',o);
end.
Если понравилось решение - ставь 5 звезд и "Лучший ответ"!