Переведите код из Паскаля в Пайтон program Z51; - вопрос №2052078951 от bpanraw 02.04.2021 19:23

Question

Информатика: Переведите код из Паскаля в Пайтон program Z51; var a, sum: integer; begin readln(a); sum := 0; while a 0 do begin if (a mod 2 0) and (a mod 3 = 0) then sum := sum + 1; readln(a); end; writeln(sum) end.

bpanraw · Answer

a = int(input())total = 0while a != 0:    if (a % 2 != 0) and (a % 3 == 0): total += 1    a = int(input())print(total)Объяснение:В Питоне sum — это функция, поэтому название заменено на total....

Переведите код из Паскаля в Пайтон program Z51; var a, sum: integer; begin readln(a); sum := 0; while a <> 0 do begin if (a mod 2 <> 0) and (a mod 3 = 0) then sum := sum + 1; readln(a); end; writeln(sum) end.

Переведите код из Паскаля в Пайтон program Z51;
var a, sum: integer;
begin
readln(a);
sum := 0;
while a <> 0 do
begin
if (a mod 2 <> 0) and (a mod 3 = 0) then sum := sum + 1;
readln(a);
end;
writeln(sum)
end.