Две по информатике сделать на языке pascal 1)четырём классам поручено убрать пол площадью f га. известно количество учеников в каждом классе. сколько га надо убрать каждому классу? 2)дано действительное число a. не пользуясь никакими другими операциями ,кроме умножения,получить : а) a^4 за две операции; б) a^6 за три операции (^=степень)

148

263

Посмотреть ответы 2

Ответы на вопрос:

yaroslavat05

Информатика

4,8(67 оценок)

1) var k1,k2,k3,k4: integer; f,f1,f2,f3,f4: real; begin write('f = '); readln(f); writeln('k1, k2, k3, k4: '); readln(k1,k2,k3,k4); f1: =f/(k1+k2+k3+k4)*k1; f2: =f/(k1+k2+k3+k4)*k2; f3: =f/(k1+k2+k3+k4)*k3; f4: =f/(k1+k2+k3+k4)*k4; writeln('f1 = ',f1: 5: 2); writeln('f2 = ',f2: 5: 2); writeln('f3 = ',f3: 5: 2); writeln('f4 = ',f4: 5: 2); end. пример: f = 5 k1, k2, k3, k4: 11 14 13 12 f1 = 1.10 f2 = 1.40 f3 = 1.30 f4 = 1.20 2) var a,a4,a6: real; begin write('a = '); readln(a); a4: =a*a; //a^2 a4: =a4*a4; //a^4 writeln(a,'^4 = ',a4); a6: =a*a; //a^2 a6: =a6*a6*a6; //a^6 writeln(a,'^6 = ',a6); end. пример: a = 2 2^4 = 16 2^6 = 64

AvgustinaQueen

Информатика

4,5(63 оценок)

Int n; public struct shkolyari{ int a1,a2,a3; string name; }obj[n]; console.readln(n); for(int i =0 ; i< n; i++) { console.readln(obj[i].name + a1+a2+a3); } for(int i =0 ; i< n ; i++) { int sum1 = sum1+obj[i].a1; int sum2 = sum2+obj[i].a2; int sum3 = sum3+obj[i].a3; } console.writeline(\ sum1 + sum2 + sum3 )