Привет дорогой друг!
Мое лето прошло замечательно. Я весело отдыхал на море, загорал, собирал ракушки и гулял с друзьями. В конце лета меня отправили на дачу. Там я помогал бабушке по хозяйству, а также ходил на речку. Полагаю, что это лето было самым лучшим в моей жизни!
А как ты отдохнул?
Нет,он не кодировал!
Var sum,i:integer;
begin
for i:=100 to 1000 do
if (i mod 3=0) then sum:=sum+i;
writeln('Сумма чисел кратных 3 равна ',sum);
end.<span>
</span>
//PascalABC.NET
//Версия 3.3.5, сборка 1650
begin
var s:=ReadString('введите свое имя и фамилию:');
for var i:=1 to 10 do s.Println;
end.
От 45 до 70 см
______________________
<span>Far Manager</span> - <span>системное программное обеспечение</span>
<span>Microsoft Excel</span> - <span>прикладное программное обеспечение</span>