Пример В)
uses crt;var f,a,b,c:real;beginwriteln ('Введите число A');readln (a);writeln ('Введите число B');readln (b);writeln ('Введите число C');readln (c);F:=(sqrt(sqr(b)*2)-4*a*c);writeln('Ответ: ',f:2:1);end.
Что такое диаграмма?
Диагра́мма — это графическое представление данных линейными отрезками или геометрическими фигурами, позволяющее быстро оценить соотношение нескольких величин. Представляет собой геометрическое символьное изображение информации с применением различных приёмов техники визуализации.
Каково значение диаграмм?
Диаграммы не только нагляднее и красочнее представляют материал , но и помогают провести некий анализ и сделать определенные выводы, которые помогут в дальнейшем.
1)program task1;
2)uses crt;
3)const n=10;
4)var a:array[1..n] of integer;
5) i:integer;
6)sr:real;
7)begin
8)clrscr;
9)randomize;
10)for i:=1 to n do
11)begin
12)a[i]:=random(11)*1;
13)write(a[i],' ');
14)end;
15)for i:=1 to n d
16)begin
17)sr:=(a[1]*a[2]*a[3]*a[4]*a[5]*a[6]*a[7]*a[8]*a[9]*a[10])/n;
18)end;
19)writeln;
20)writeln('srednee arefmiticheskoe=',sr:6:2);
21)readln;
22)end
Ничего особенного для 8 класса.
Pascal:
program decrement;
var
i: integer;
begin
i := 50;
while i >= 1 do
begin
if i mod 2 = 1 then
writeln(i, ' ');
i := i - 1;
end;
end.
---
C++:
#include <iostream>
int main() {
int i = 50;
while (i >= 1) {
if (i % 2 == 1)
std::cout << i << ' ';
i--;
}
return 0;
}