Написать программу нахождения середины отрезка Пользователь вводит координаты двух точек
Программа считывает
Проводит вычисления
и выводит результат на экран
Как вычислить середину отрезка? Сложить и разделить пополам. Что именно сложить? Подумайте
Можно как написать программу на компьютере и сбросить скриншот, так и написать в тетради и сделать фото
//c циклом for
var s,i:integer;
begin
for i:=100 to 999 do
if i mod 77 = 0 then s:=s+i;
writeln('Сумма трехзначных кратных 77: ',s);
end.
Тестовое решение:
Сумма трехзначных кратных 77: 5929
// с циклом while
var s,i:integer;
begin
i:=100;
while i<=999 do begin
if i mod 77 = 0 then s:=s+i;
i:=i+1;
end;
writeln('Сумма трехзначных кратных 77: ',s);
end.