Var a, b, i: integer; begin for i: =10 to 99 do if (i mod 3 = 0) or (i mod 5 = 0) then write (i,' '); end.p.s. надеюсь на и лучший ответ.
Владимировна Екатерина
16.03.2020
1. электронная таблица представляет собой совокупность нумерованных строк и поименованных столбцов(латинскими буквами) 2. свойство алгоритма,заключающееся в отсутствии ошибок,алгоритм должен приводить к правильному результату для всех допустимых входных значений,называется результативность. 3. объем информационного сообщения 12288 битов,можно вводить 12288 бит = 1536 байт = 1,5кбайт4. какой алгоритм называется линейным? линейным называется алгоритм, который не имеет ответвлений (поворотов), другими словами прямой.
Владислава531
16.03.2020
Чтобы задать прямоугольник, достаточно указать координаты концов его диагонали, например, идущей из левого верхнего угла в правый нижний, т.е. две точки: b(x1,y1) и d(x2,y2). но можно также задать и другую диагональ (ac). если считать, что стороны прямоугольника параллельны осям координат то длины сторон могут быть найдены как тогда можно найти и периметр: нахождение периметра оформим процедурой per(x1,y1,x2,y2,p) procedure per(x1,y1,x2,y2: real; var p: real); begin p: =2*(abs(x2-x1)+abs(y2-y1)) end; var x1,x2,y1,y2,p: real; begin write('введите координаты любой вершины прямоугольника: '); read(x1,y1); write('введите координаты противоположной вершины прямоугольника: '); read(x2,y2); per(x1,y1,x2,y2,p); writeln('периметр прямоугольника равен ',p) end. тестовое решение: введите координаты любой вершины прямоугольника: 5 -7 введите координаты противоположной вершины прямоугольника: -4 12 периметр прямоугольника равен 56
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Написать программу, которая выводит на экран все двухзначные числа, делящиеся на 3 или на 5 (использовать операции целочисленного деления div или mod