Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
s : = 0
for i : = 1 to n do
if i mod 2 = 1 then
s : = s - 1/2/n
else
s : = s + 1/2/n;
var s: string; begin writeln('как вас зовут? '); readln(s); case s of 'вася': s: ='василий'; 'петя': s: ='петр'; 'люся': s: ='людмила'; 'миха': s: ='михаил'; 'пупс': s: ='пупондий'; else s: ='я с вами не знакома'; end; writeln(s); readkey; end.
существительные женского рода
a- к красному
b- к зеленому
с- к синему
Популярные вопросы