Содержание
- 12. program listing_1_1; begin writeln (‘Это пример '); writeln (‘первой программы '); end. Первые программы Это пример
- 13. program listing_1_2; var N: integer; begin read(N); N:=N*N; write (' Квадрат введенного числа равен ',N) end.
- 14. program listing_1_3; var N,M,W:integer; begin N:= 25; M:= 6; W:= N*M; writeln ('25 умножить на 6
- 16. Скачать презентацию
Слайд 2
Слайд 3
Слайд 4
Слайд 5
Слайд 6
Слайд 7
Слайд 8
Слайд 9
Слайд 10
Слайд 11
Слайд 12
program listing_1_1;
begin
writeln (‘Это пример ');
writeln (‘первой программы ');
end.
Первые программы
Это
program listing_1_1;
begin
writeln (‘Это пример ');
writeln (‘первой программы ');
end.
Первые программы
Это
пример
первой программы
первой программы
Слайд 13
program listing_1_2;
var
N: integer;
begin
read(N);
N:=N*N;
write (' Квадрат
program listing_1_2;
var
N: integer;
begin
read(N);
N:=N*N;
write (' Квадрат
введенного числа равен ',N)
end.
end.
Первые программы
Слайд 14
program listing_1_3;
var N,M,W:integer;
begin
N:= 25;
M:= 6;
W:= N*M;
writeln
program listing_1_3;
var N,M,W:integer;
begin
N:= 25;
M:= 6;
W:= N*M;
writeln
('25 умножить на 6 равняется ',W);
W:= N div M;
writeln ('Результат целого деления 25 на 6 равняется ',W);
W:= N mod M;
writeln ('Остаток от деления 25 на 6 равняется ',W);
W:= N + M;
writeln ('Сумма 25 и 6 равняется ',W);
W:= N - M;
writeln ('Если от 25-ти отнять 6, то получится ',W)
end.
W:= N div M;
writeln ('Результат целого деления 25 на 6 равняется ',W);
W:= N mod M;
writeln ('Остаток от деления 25 на 6 равняется ',W);
W:= N + M;
writeln ('Сумма 25 и 6 равняется ',W);
W:= N - M;
writeln ('Если от 25-ти отнять 6, то получится ',W)
end.
Первые программы
25 умножить на 6 равняется 150
Результат целого деления 25 на 6 равняется 4
Остаток от деления 25 на 6 равняется 1
Сумма 25 и 6 равняется 31
Если от 25-ти отнять 6, то получится 19
- Предыдущая
С.Сейфуллин Последние годы жизниСледующая -
Электронные таблицы