Составьте программу , которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150 (блок схема )

program 123;

uses crt; /// Если паскаль

var

i:integer;

begin

writeln('Введите число: ');

readln(i);  

for i:=2 to 150 do begin

if ((i mod 2 = 0) and (i mod 13 = 0)) then

writeln (i)

end;

end.

БЛОК СХЕМА

см файл

за январь нет оплаты так как нет предыдущих показаний

excel таблицы не прикрепляются

а необходимо

б достаточно

в необходимо

г достаточно

д необходимо и достаточно