Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Объяснение:
Киіз үй : Домалақ,Төртбұрыш,Үшбұрыш
Бесік:Үшбұрыш, сызық,,домалақ
Сандық:Төртбұрыш
Домбыра Домалақ,сызық
program xxx;
var i : integer;
a : array[1..15] of real; n : real; begin randomize; for i: =1 to 15 do a[i]: =random(20)-20;
writeln('исходный массив а: ');
for i: =1 to 15 do
write(a[i]);
n: =a[1];
a[1]: =a[15];
a[15]: =n;
writeln('полученный массив а: ');
readln
end.
var a: integer;
begin readln(a); if (4 * a > 9) and (4 * a < 100) then writeln('периметр двузначное число') else writeln('периметр не двузначное число'); end.
Популярные вопросы