Python. Пользователь программы вводит натуральное число N. Напишите программу, выводящую на экран первые N натуральных чисел, кратных 3 (по три числа в строке через пробел)
Program asd; Var A,C:array[1..2500] of integer; i,n,s,ii:integer; sr:real; BEGIN Write('Введите n: '); Readln(n); Writeln('Массив: '); For i:=1 to n do begin A[i]:=1+Random(9); Write(A[i]:2); end; Writeln; Writeln('Все элементы, которые меньше последнего числа в ряду: '); For i:=1 to n do begin if A[i]<A[n] then Write(A[i]:2); end; Writeln(); Writeln('Номер элементов, которые от 3 до 7.: '); For i:=1 to n do begin If (A[i]>=3) and (A[i]<=7) then begin C[i]:=i; Write(C[i],' '); end; end; END.
Задача А
program Boom;
uses crt;
var
a, b: integer;
begin
Read(a, b);
if a > b then Writeln('Наибольшее число ', a) else Writeln('Наибольшее число ', b);
end.
Тестовое решение
12
52
Наибольшее число 52
Задача Б
program Boom;
uses crt;
var
a:array[1..4] of Integer;
max:integer;
i:byte;
Begin
for i:= 1 to 4 do
Begin
Write('Введите число:');
Read(a[i]);
End;
max := a[1];
for i:= 2 to 4 do
if a[i] > max then
max := a[i];
Write('Наибольшее число:');
WriteLn(max);
End.
Тестовое решение:
Введите число:12
Введите число:53
Введите число:34
Введите число:63
Наибольшее число:63