Ответ:
program a;
var q,w:integer;
begin
write(' Cколько раз повторить?');
readln(q);
for w:=1 to q do
writeln('Привет!');
end.
Объяснение:
var i,s:integer;
begin
for i:=1 to 99 do s:=s+i;
writeln(s);
end.
Дисковод - это устройство для считывания дисков (не давно отвечал на другой вопрос по этому на этот отвечать можно будет через 40 сек. ждём )
Ответ:
Если сумма квадратов двух сторон равна квадрату третьей, то прямоугольный, если больше, то остроугольный, если меньше то тупоугольный. Если все стороны равны равносторонний, если две стороны равны, а третья нет, равнобедренный.
0