, мне нужно скопировать это и вставить в ВОРД а не фоткай, кто можешь скинуть
Л/Р 3 информатика
Лабораторная работа №3
Тема: Создание и форматирование таблиц в документе MSWord.
Цель:Изучениетехнологии создания и форматирования таблиц в MSWord.
Оборудование: ПК, MSWord 2007.

program;   var  i: byte;   str: string;   begin  for i: =60 to 70 do  begin  str: =str+chr(i) ;   end;   writeln(str);   end.

b) 9 лет

2020=4

2011=4 

вот проверила, так работает. нормально?

program maxmin; var    a, b, c: integer;     max, min: integer; beginwriteln('введите три числа.'); read(a,b,c); {вводи числа через пробел}max: =a; if(b> max) then max: =b; if(c> max) then max: =c; min: =a; if(b< min) then min: =b; if(c< min) then min: =c; writeln('разность наибольшего и наименьшего чисел равна ',max-min); end.

2*3=6

512*128*6=393216

393216: 1024=384кб