1) i=17 k=17 I=ki I=17*17 I=289
2)i=29 k=29 I=ki I=29*29 I=841
3)i=14 k=14 I=ki I=14*14 I=196
Код
var
s: real;
begin
s := 114.12696;
writeln(s:6:2)
end.
Вывод
114.13
Пишу на QBasic
Допустим массив уже дан и заполнен
FOR I = 1 TO (Кол-во элементов массива)
IF A(I)=C THEN
X=X+1
END IF NEXT I
PRINT X
Данный код также проверяет и строки