Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
const
a: array[1..6]of longint=(7,4,10,6,5,3);
var
i: longint;
begin
for i: =1 to 6 do write(9.8*a[i]*1200,' ');
writeln;
end.
рrogram summa;
var s, a, b, c : word;
write('введите a - > '); readln(a);
write('введите b - > '); readln(b);
write('введите с - > '); readln(c);
s=а+в+с
write(' сумма равна ',s);
readln
в принципе все, должно быть правильно
р треугольника= сложить все стороны
т.к 3 вида флагов, значит возводим число 3 в степень равную кол-ву флагов
ответ: 81 сигнал
Популярные вопросы