Var
a, b: real;
begin
readln(a, b);
if a <> 5.5 then a := a * 2;
if b <> 5.5 then b := b * 2;
writeln(a, ' ', b );
end.
Print("Введите n:")
n = int(input())
s = 0
for i in range(n+1):
s = s+i*i
print("s =",s)
Пример:
<span>Введите n: 3
s = 14</span>
Для Paint не знаю честно, возможно в старых версиях (у меня старая) такого нет. В Photoshop помню наизусть: Нажать кнопку "Файл", нажать кнопку "Открыть", выбрать изображение, Нажать кнопку "Коррекция", нажать кнопку "обесцветить". Готово.
<span>var
i:integer;
begin
i:=2;
while i<=100 do
begin
write (i,' ');
i:=i+2;
end;
end.</span>