РЕШИТЕ КТО ЧТО СМОЖЕТ! ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО! информатика 10 кл.1. Задана сторона a...

0 голосов
10 просмотров
РЕШИТЕ КТО ЧТО СМОЖЕТ! ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО! информатика 10 кл.
1. Задана сторона a
равностороннего треугольника. Вычислите высоту треугольника и его площадь.
2.Дано действительное число a. Не пользуясь никакими другими операциями кроме умножения, получить a в 6 степени за три операции.
3. Задано целое число. Определить положительное оно или отрицательное, и четное или не четное?
4. Дано три числа x, y, z. Вычислить сумму только положительных чисел из трех данных.

Информатика (14 баллов) | 10 просмотров
Дан 1 ответ
0 голосов

4)
begin
    read(x, y, z);
    if x>0 then sum:=sum+x;
    if y>0 then sum:=sum+y;
    if z>0 then sum:=sum+z;
    writeln(sum);
end.

(176 баллов)