Визначте, який рядок буде сформований у результаті виконання програми:
program pr1;
Uses sysutils;
var i: Integer; j: real; S: String;
begin
S := '';
for i:=1 to 2 do begin
j := 0.1;
While j<1 do begin
j := j+0.3;
S := S + FloatToStr(j) +' ';
end;
end;
WriteLn(S);
end.
var i, j: Integer; S: String;
Визначте, який рядок буде сформований у результаті виконання фрагмента програми:
For i := 1 To 2 do begin
S := S + IntToStr (i);
For j := 1 To 3 do S:=S + 'A';
end;
Визначте, які оператори реалізують обчислення f=10!
var i, n: Integer; f: longint;
В яких операторах допущені помилки?
Що виведе оператор WriteLn після виконання програми:
program pr1;
var
i:Integer; A,S:Real;
begin S := 0; A := 0;
For i := 1 To 5 Do begin
A := A+0.2;
S := S+A end;
WriteLn(S);
end.
Вкажіть на правильний порядок розташування операторів у програмі для визначення кількості парних серед введених з клавіатури восьми довільних чисел.
Визначте, який рядок буде сформований у результаті виконання програми:
program pr1;
Uses sysutils;
var i, j: Integer; S: String;
begin
S := ''; For і:=1 To 2 do begin
j := 0.1;
While j<1 do begin j := j+0.3; S := S +IntToStr(j) +' ';
end;
WriteLn(S);
end.
До якого типу може відноситись змінна F, якщо F=10!
Створюйте онлайн-тести
для контролю знань і залучення учнів
до активної роботи у класі та вдома