Var
n:integer;
Begin
Write('Введите четырёхзначное число ');
Readln(n);
if ((n>999) and (n<10000)) or ((n>-10000) and (n<-999)) then Begin
Write('Сумма цифр числа ',n);
if ((n div 1000 + n div 100 mod 10 + n div 10 mod 10 + n mod 10) mod 2) = 0 then Write(' чётна') else Write(' не чётна');
End
else write('Число ',n,' не четырёхзначное. Перезапустите программу');
End.
Среда не уточнялась
<meta charset = "utf-8"><script type="text/javascript">
// a и b - длины , h - высота , s- площадь. var a = prompt("Введите длину первого основания"); var b = prompt("Введите длину второго основания"); var h = prompt("Введите длину высоты") ; var s;
a = parseInt(a); b = parseInt(b); h = parseInt(h); s = parseInt(h);
s = ((a+b)/2)*h; alert("Площадь данной трапеции" + s); </script>
<span />
2100 + 68 = 2168 то есть в)
между буквами +
Составим план:
1История создания
2использование человеком
3Внешнее стоение
4 Внутреннее строение
Ну и т.д.