Выделение и deleted вроде
Сканируется изображение 45,72×45,72 см.
необходимо перевести в дюймы 1дюйм = 2,54 см
45,72 / 2,54 см = 18 дюймов
18*18 = 324 дюймов все изображение
600 * 1200 * 324 = 233280000 точек
точек с цветом
233280000 * 24 = 5598720000 точек / 8 = 699840000 байт
<span>699840000 байт = 667,4 Мбайт</span>
В первом задании:
1)Он просит ввести два значения, b и c
2)Идет подстановка в формулу дискриминанта, которая записана в переменную d
3)Вывод ответа, чему равен x1 и x2
Второе задание:
Write() выводит сообщение, Writeln() выводит сообщение и переносит на строчку вниз следующее.
1234
56
78
Третье:
Просит ввести два числа и потом как бы вывод а,b,a, но дело в том что переменные объявлены как integer, то есть целые числа, а значит 2.0 не прокатит ибо это число с плавающей точкой, другой тип данных и на выходе программы будет ошибка
Var
i,n:integer;
Begin
for i:= 1 to 119 do
if (i mod 5) = 0 then
n:=n+i;
Write('Сумма положительных кратных 5 чисел, меньших 120 равна ',n);
<span>End.
И вопрос - вы действительно 1-4 класс?</span>