Program p1;
var i,n,a:integer;
begin
n:=99;
a:=10;
for i :=10 to n do
begin
a:=a+i;
end;
writeln(a);
readln;
end.
Ответ: 1
Так как более короткая дорога из пункта А ведёт в Е, а из него можно доехать до В, то посчитаем этот путь.
2+3=5
т. к. 5 это наименьший вариант среди предложенных вариантов ответов, то берём его
Var
a,b,i:integer;
Begin
Write('Введите А и В ');
Read(a,b);
for i:= a to b do
writeln(a+(i-a),'^2 = ',sqr(i));
End.
Аудиофайл для колонок.
Видеофайл для монитора.
Текстовый файл для монитора.
Графический файл для монитора.
Скорее всего неверный подбор - принтер. Объясни свой вопрос поподробнее.
Подробное решение внутри файла