program; var i: byte; str: string; begin for i: =60 to 70 do begin str: =str+chr(i) ; end; writeln(str); end.
Ответ дал: Гость
program zadacha2;
uses crt;
var i,n,a: integer;
b,y,c,l: real;
begin
clrscr;
readln(n);
a: =1;
b: =2;
c: =5;
for i: =1 to n do
begin
if a mod 2 = 0 then
l: =a+b/c
else
l: =a-b/c;
a: =a+1;
b: =b+2;
c: =c+5;
y: =y+l;
end;
writeln(y: 2: 2);
readkey;
end.
первую по подробней расспишите
Ответ дал: Гость
если сравнивать объекты и их свойства между собой, то можно говорить о свойствах общих и отличительных.общие свойства объединять объекты в группу (группа – это множество объектов, где каждый объект является элементом этого множества). отличительные свойства отличить один объект от другого. например, свойство «защищать ноги» – это общее свойство ботинок, сапог, сандалий и туфель. а вот свойство «хранить тепло» – это отличительное свойство зимней обуви, если сравнивать её с летней.
информация бывает - визуальная (зрение) и звуковая (слух).
Популярные вопросы